R:使用我自己的公式将曲线添加到x,y散点图中

Question

我想在x,y散点图中添加具有以下等式的曲线:y < - (105 + 0.043(x ^ 2-54x)).是否可以在plot()函数中使用？另外,如果我使用qplot代替(ggplot2)有没有办法绘制这条曲线？

Answer 1

# data for scatterplot
x = rnorm(10, sd = 10)
y = (105 + 0.043 * (x^2 - 54 * x)) + rnorm(10, sd = 5)

基础绘图

plot(x, y)
curve(105 + 0.043 * (x^2 - 54 * x), add = T)

对于ggplot,我们需要一个data.frame

dat = data.frame(x = x, y = y)

ggplot(dat, aes(x , y)) + 
    geom_point() +
    stat_function(fun = function(x) 105 + 0.043 * (x^2 - 54 * x))