问题描述
我得到了一个函数(混合了 beta 分布):
f(x) = beta(1,6)/3 + beta(3,6)/3 + beta(10,6)/3
我的任务是绘制 f(x) 的密度。
这是我的代码:
par(mfrow=c(1,1))
x <- seq(0,1,0.001)
plot(x,dbeta(x,shape1 = 1,shape2 = 6)/3 + dbeta(x,shape1 = 3,shape1 = 10,shape2 = 6)/3,col="blue",lwd=2)
只是想知道这是否是正确的做法?如何使用密度函数来做到这一点?谢谢!
解决方法
你可以在 ggplot2 中这样做:
"$@"
祝你好运!