0

我想在经验累积分布曲线上绘制 Weibull 分布的累积分布曲线。

我已经尝试过几次,但它并没有达到我想要的方式。这是命令:

x<-(SIZEDIST$AVG.µm.)
x
plot(x,pweibull(x,shape=1.120662,scale=18.496778),type="l",col=4)
plot(ecdf(x),add=TRUE)
4

2 回答 2

0

像这样?

set.seed(1)  # for reproducibility
# 1000 random samples from the Weibull dist
X <-rweibull(1000,shape=1.120662,scale=18.496778)
# z covers the range in X
z <- seq(min(x),max(x),length=100)
plot(z,pweibull(z,shape=1.120662,scale=18.496778),type="l",col=4, ylab="CDF")
plot(ecdf(x),add=TRUE)
于 2014-03-16T19:57:43.043 回答
0

使用lines代替plot

plot(x,pweibull(x,shape=1.120662,scale=18.496778),type="l",col=4)
lines(ecdf(x),col='red')
于 2014-03-16T13:22:13.733 回答