如何在没有for循环的情况下重复生成随机样本1000次并绘制alpha估计量的图?

问题描述

我必须根据beta分布(alpha = 5,beta = 1)生成一个n = 20的随机样本,并计算alpha的MLE。我使用功能rbeta和ebeta做到了这一点:

alfa = 5
beta=1
n = 20
sample<- rbeta(n,alfa,beta)
mle_alfa <- ebeta(proba,method = "mle")$parameters[1]

但是我必须重复指向它1000次(即生成1000个样本)并绘制直方图,箱形图和q-qplots

enter image description here

我试图像这样在循环中重复它,但是我不知道它是否正确以及如何使用它来绘制曲线。你能帮我么?谢谢!

sample2<- sapply(1:1000,function(x) rbeta(n,beta))
sample2<- as.numeric(sample2)

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)