在r中绘制(β)曲线

Question

我使用了以下代码来绘制beta曲线:

p <- seq(0, 1, length=100)
plot(p, dbeta(p, 5, 7), ylab="density", type="l", col=4)

我想在同一张图上画两条曲线，所以用不同的数值代替5和7重复第二行。这导致第二条曲线被打印在不同的图表上(即我得到了两个独立的图表)。谁能解释一下如何在同一张图上得到两条曲线?

Answer 1

ggplot:

library(ggplot2)
p= as.data.frame(seq(0,6,length=100))
ggplot(p) +
stat_function(fun = function(p) dbeta(p, 5, 7), color = "red", size = 1) +
xlab("beta curve")