绘制理论CDF

Question

我正在尝试绘制经验累积分布函数和理论累积分布函数。 这是我的R代码：

x=rgamma(40, 2, 1/3)
plot(ecdf(x))
lines(x, pgamma(x, shape = 2, scale = 3), type="l", col = "red")

但是我在附件中找到了该图，我认为这是不合理的。 我做错了什么？

Answer 1

扩展我的评论...这是您要找的吗？

x=rgamma(40, 2, 1/3)
plot(ecdf(x))
curve(pgamma(x, shape = 2, scale = 3), 
      0, 30, 
      add=TRUE,
      col="red")

结果如下图：