如何在同一图中将两条累积分布曲线绘制为线型

Question

我想绘制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)

Answer 1

使用lines代替plot

plot(x,pweibull(x,shape=1.120662,scale=18.496778),type="l",col=4)
lines(ecdf(x),col='red')

Answer 2

喜欢这个吗？

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)