求修改一个简单R代码

1844

收藏 2011-02-24

悬赏 20 个论坛币未解决

要把X~N(100,15^2)的概率分布图，任意选出100000个样本的histogram, 样本大小为75的X平均值的概率分布图，三个图画在一起，我的代码如下，但是比例不一样，不完全重合，求高手修改！

复制代码

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

全部回复

2011-2-25 03:39:17

x <- rnorm(100000, 100, 15)
hist(x, prob = TRUE)
curve(dnorm(x, 100, 15), 40, 160, add = TRUE)
curve(dnorm(x, 100, sqrt(3)), 40, 160, add = TRUE)

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

2011-2-25 05:10:16

呵呵，不知道楼主为啥要第一行的代码“x<-seq(40,160,0.0001)。。。

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享