R语言 ggplot2 绘制平滑自然折线图

在 R 语言的 ggplot2 包中，可以通过 'geom_smooth()' 函数实现绘制平滑的自然曲线。该函数会自动拟合数据并绘制平滑曲线。

下面是一个简单的示例代码：

library(ggplot2)

# 创建一个示例数据集
data <- data.frame(
  x = c(1, 2, 3, 4, 5),
  y = c(2, 4, 1, 6, 3)
)

# 使用ggplot函数创建绘图对象，并指定数据集和x、y变量
p <- ggplot(data, aes(x, y))

# 使用geom_line函数绘制折线图
p + geom_line() +

# 使用geom_smooth函数添加平滑曲线
geom_smooth()

在上面的代码中，首先创建了一个示例数据集 data，然后使用 ggplot 函数创建了一个绘图对象 p，并指定了数据集和 x、y 变量。接下来使用 'geom_line()' 函数添加了折线图，最后使用 'geom_smooth()' 函数添加了平滑曲线。运行代码后，就可以得到一个平滑自然的折线图。

需要注意的是，'geom_smooth()' 函数会根据数据的特点自动选择适合的平滑方法，默认使用的是方法 'loess'。如果想要使用其他平滑方法，可以通过方法参数进行设置，例如 'geom_smooth(method = "lm")' 表示使用线性回归进行平滑。