使用方程绘制ggplot中的多项式曲线,而不是数据点

Question

有没有办法在ggplot中绘制多项式函数,而不必绘制包含沿感兴趣曲线的选定点的数据帧？假设方程是x ^ 3 + x ^ 2 + x + 5.我认为这可以做得很多,就像geom_abline可以用来为情节添加直线但是到目前为止没有运气找到方法去做这个.我检查了ggplot2文档,但没有看到任何我认为会有帮助的东西.geom_abline似乎没有延伸过直线.

我的最终目标是绘制来自独立数据集的数据,并将此多项式曲线用作"参考标准".下面的代码有效地绘制了感兴趣的曲线,但是通过沿曲线绘制值而不是直接使用等式来绘制.

x <- 1:100
y <- x^3+x^2+x+5
dat <- as.data.frame(x,y)
ggplot(dat, aes(x,y)) + geom_point()

Answer 1

你在寻找stat_function(),我想:

x <- 1:100
dat <- data.frame(x,y=x^3+x^2+x+5)
f <- function(x) x^3+x^2+x+5
ggplot(dat, aes(x,y)) + 
    geom_point()+
    stat_function(fun=f, colour="red")