created:05-17-2022
views:28
0
  • 线性拟合
  • 对数函数拟合
  • 指数函数拟合
  • 多项式拟合
asked 1 month, 2 weeks ago
user image wiki
添加评论
评论需要先登录哦o( ̄ε ̄*)
0

线性拟合

线性拟合为默认方法,不同特别指定:

library(ggplot2)
p <- ggplot(df, aes(x=a, y=b)) +
geom_point() +
geom_smooth(method="lm", se=FALSE)

对数函数和指数函数

library(ggplot2)
linear.model <-lm(y ~ x, df)
log.model <-lm(log(y) ~ x, df)
exp.model <-lm(y ~ exp(x), df)

使用:

对数函数:

library(ggplot2)
p <- ggplot(df, aes(x=a, y=b)) +
geom_point() +
geom_smooth(method="lm", formula=(log(y) ~ x), se=FALSE)

指数函数:

library(ggplot2)
p <- ggplot(df, aes(x=a, y=b)) +
geom_point() +
geom_smooth(method="lm", formula=(y ~ exp(x)), se=FALSE)

多项式拟合

使用关键字poly

library(ggplot2)
p <- ggplot(df, aes(x=a, y=b)) +
geom_point() +
geom_smooth(method="lm", formula=y ~ poly(x, 3, raw=TRUE),se=FALSE)
  • 二次:formula=y ~ poly(x, 2, raw=TRUE)
  • 三次:formula=y ~ poly(x, 3, raw=TRUE)
  • ...:...
05-17-2022
添加评论
评论需要先登录哦o( ̄ε ̄*)
添加回答