我查看了uniroot和optimize的描述,但它们有些不同,但书籍参考是一样的,我想知道是否有理由选择一个而不是另一个？

我尝试在r中编写程序"使用函数从任何分布生成随机样本".但它显示"hist.default(xbars)中的错误:'x'必须是数字"我的程序在这里

sim.clt <- function(n, ran.func,..., simsize,...)
{
  xbars<-vector()
  for(i in 1:simsize=simsize)
  {
    x<-function(ran.func)

      xbars[i]<-mean(x)
 }
par(mfrow=c(2,1))
hist(xbars)
qqnorm(xbars)
return(xbars)
}
sim.out<-sim.clt(n=20,ran.func="rexp",simsize=5000)
shapiro.test(sim.out)

#

我是r编程的新手,所以无法弄明白,如何解决问题.谢谢...