3229 4

[问答] 请问如何用r实现中心极限定理,O(∩_∩)O谢谢!! [推广有奖]

  • 0关注
  • 0粉丝

本科生

17%

还不是VIP/贵宾

-

威望
0
论坛币
322 个
通用积分
0.8500
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
3605 点
帖子
12
精华
0
在线时间
132 小时
注册时间
2016-8-20
最后登录
2022-9-7

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
需要用到hist和replicate函数
二维码

扫码加我 拉你入群

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

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

关键词:中心极限定理 中心极限 如何用 R实现 replicate 极限 如何 中心

回帖推荐

ZhandaYang 发表于2楼  查看完整内容

这是作业么? runif(10) 生成10个随机数,mean 计算出平均值,replicate 重复1000次,hist画出图来,看一看挺像正态分布的~
沙发
ZhandaYang 发表于 2017-5-21 00:07:26 |只看作者 |坛友微信交流群
这是作业么?

  1. hist(replicate(1000, mean(runif(10))))
复制代码


runif(10) 生成10个随机数,mean 计算出平均值,replicate 重复1000次,hist画出图来,看一看挺像正态分布的~

使用道具

藤椅
zhou1_20 发表于 2017-5-21 17:18:43 |只看作者 |坛友微信交流群
  1. numsim = 100
  2. matx = matrix(rnorm(numsim^2, 2, 1), nrow=numsim)
  3. runavg = function(x) { cumsum(x)/(1:length(x)) }
  4. ramatx = t(apply(matx, 1, runavg))
  5. plot(x=1:numsim, y = ramatx[,1], type="n",
  6.      xlab="number of observations", ylab="running mean")
  7. ralines = function(x) lines(x~seq(1:length(x)),col='blue')
  8. apply(ramatx, 1, ralines)
复制代码

使用道具

板凳
mlloved 发表于 2019-9-22 13:10:28 来自手机 |只看作者 |坛友微信交流群
露泫低珠佩3 发表于 2017-5-20 19:46
需要用到hist和replicate函数
代码在哪里

使用道具

报纸
lixiaos 发表于 2021-10-12 00:16:56 |只看作者 |坛友微信交流群
楼上的真妙
hist(replicate(10000,mean(sample(1:100,30))))

使用道具

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-4-25 23:43