求教：Error: could not find function "limite.central"

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

本人R初学者，遇到一些找不到的函数会找镜像下载安装包，可是没找到limite.central，求教大神，如何解决这个问题？谢谢

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：function central limit Error Could function 初学者 Error 下载安装

已经解决了。打扰了

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)

店小二訁上菜 发表于 2015-1-17 20:44
已经解决了。打扰了

谢谢您！向各位大神学习[em27]

DM小菜鸟 发表于 2015-4-3 21:54
limite.central

非常感谢您的帮助！问题按照你的提点已解决！向各位大神看齐，祝好运[handshake]

店小二訁上菜 发表于 2015-1-17 20:44
已经解决了。打扰了

你好，请问您的这个问题是怎么解决的呀？

您你好，出现：错误: 没有"limite.central"这个函数。怎么回事啊

cshtai 发表于 2015-11-12 00:05
您你好，出现：错误: 没有"limite.central"这个函数。怎么回事啊

书本前面有一个作者写的Limite.central的程序，把那个程序运行一下，就不会有问题了。前面的楼层解释过。

店小二訁上菜 发表于 2015-11-13 00:53
书本前面有一个作者写的Limite.central的程序，把那个程序运行一下，就不会有问题了。前面的楼层解释过。

就是说，limite.cetral 不是包里面的函数是吗，然后属于自己编辑的，然后保存在工作空间，然后再调用？

cshtai 发表于 2015-11-19 00:43
就是说，limite.cetral 不是包里面的函数是吗，然后属于自己编辑的，然后保存在工作空间，然后再调用？

是的。。。。