平滑曲線並在 R 中得到它的方程

Question

我在 R 中有這個代碼：

 plot(p,vec, pch = 4, xlab= "Values of x",ylab= "f(x)" )
  lines(p,vec)
  return (vec)

我有這個情節：

我想平滑曲線並在 R 中得到它的方程，你能幫我嗎？

Answer 1

不幸的是，我無法重現您的示例，但我想這可能是一個很好的解決方案：

library(ggplot2)
data_to_plot <- data.frame(p, vec)
p <- ggplot(data_to_plot, aes(x=p, y=vec)) + geom_point(pch=4) + geom_smooth(colour='black')

# Only plot
print(p)

# Dataset using for plotting
ggplot_build(p)

# Loess model as used in plot
loessMod <- loess(vec ~ p, data=data_to_plot)

檢查 ggplot 備忘單以獲取有關如何使其成為一個好的情節的更多信息： https ://rstudio.com/wp-content/uploads/2015/03/ggplot2-cheatsheet.pdf

有關使用平滑曲線的更多信息，請參閱： http : //r-statistics.co/Loess-Regression-With-R.html