全部版块 我的主页
› 论坛 › 数据科学与人工智能 › 数据分析与数据科学 › R语言论坛
求教：Error: could not find function "limite.central"
店小二訁上菜
8460 10
2015-01-17
本人R初学者，遇到一些找不到的函数会找镜像下载安装包，可是没找到limite.central，求教大神，如何解决这个问题？谢谢
二维码

扫码加我 拉你入群

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

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

全部回复
店小二訁上菜
2015-1-17 20:44:47
已经解决了。打扰了
二维码

扫码加我 拉你入群

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

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

DM小菜鸟
2015-4-3 21:54:43
limite.central <- function (r=runif, distpar=c(0,1), m=.5,s=1/sqrt(12),
n=c(1,3,10,30), N=1000) {
for (i in n) {
if (length(distpar)==2){
x <- matrix(r(i*N, distpar[1],distpar[2]),nc=i)
}
else {
x <- matrix(r(i*N, distpar), nc=i)
}
x <- (apply(x, 1, sum) - i*m )/(sqrt(i)*s)
hist(x,col='light blue',probability=T,main=paste("n=",i),
ylim=c(0,max(.4, density(x)$y)))
lines(density(x), col='red', lwd=3)
curve(dnorm(x), col='blue', lwd=3, lty=3, add=T)
if( N>100 ) {
rug(sample(x,100))
}
else {
rug(x)
}
}
}

op <- par(mfrow=c(2,2))
limite.central(rbinom, distpar=c(10 ,0.1), m=1, s=0.9)
par(op)
二维码

扫码加我 拉你入群

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

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

zhgg1607099163
2015-9-10 16:01:47
店小二訁上菜 发表于 2015-1-17 20:44
已经解决了。打扰了
谢谢您！向各位大神学习[em27]
二维码

扫码加我 拉你入群

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

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

zhgg1607099163
2015-9-10 16:04:23
DM小菜鸟 发表于 2015-4-3 21:54
limite.central
非常感谢您的帮助！问题按照你的提点已解决！向各位大神看齐，祝好运[handshake]
二维码

扫码加我 拉你入群

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

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

统计小孩
2015-10-11 08:36:45
店小二訁上菜 发表于 2015-1-17 20:44
已经解决了。打扰了
你好，请问您的这个问题是怎么解决的呀？
二维码

扫码加我 拉你入群

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

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

点击查看更多内容…
相关推荐
栏目导航
热门文章
推荐文章

说点什么

分享

微信QQ空间QQ微博
扫码加好友，拉您进群
各岗位、行业、专业交流群