R 将折线图更改为堆叠折线图ggplot

我有一个很基本的问题，但我找不到任何帮助

我正在用ggplot绘制一个包含五条线的“正常”折线图。My df由一年列和5个值列组成：

ggplot(data = df, aes(x = Year)) +
  geom_line(aes(y = y1, colour = "y1")) +
  geom_line(aes(y = y2, colour = "y2")) +
  geom_line(aes(y = y3, colour = "y3")) +
  geom_line(aes(y = y4, colour = "y4")) +
  geom_line(aes(y = y5, colour = "y5"))

我想将其更改为线条之间有填充区域的堆叠的折线图。是否可以不太频繁地更改上面的命令

谢谢大家!

不知道“不太修改代码”是什么意思

ggplot2

建立在数据整洁的原则之上。因此，如果您将数据转换为“整齐的数据”，即使用

ggplot2

将数据转换为长格式（例如

tidyr:：pivot\u longer

），则使用

ggplot2

进行生活a.a.绘图会变得更加容易。这样你就可以在两行中绘制出你的图

要获得堆叠区域，请切换到

geom\u区域

，在

fill

aes上映射，而不是

color

，然后设置

position=“stack”

使用一些随机示例数据，尝试以下操作：

库（ggplot2）
图书馆（tidyr）
图书馆（dplyr）
种子（42）
df%
枢轴_更长（-Year）%>%
ggplot（aes（x=年份，y=数值，fill=名称））+
几何图形区域（位置=“堆栈”）

不知道“不太修改代码”是什么意思

ggplot2

建立在数据整洁的原则之上。因此，如果您将数据转换为“整齐的数据”，即使用

ggplot2

将数据转换为长格式（例如

tidyr:：pivot\u longer

），则使用

ggplot2

进行生活a.a.绘图会变得更加容易。这样你就可以在两行中绘制出你的图

要获得堆叠区域，请切换到

geom\u区域

，在

fill

aes上映射，而不是

color

，然后设置

position=“stack”

使用一些随机示例数据，尝试以下操作：

库（ggplot2）
图书馆（tidyr）
图书馆（dplyr）
种子（42）
df%
枢轴_更长（-Year）%>%
ggplot（aes（x=年份，y=数值，fill=名称））+
几何图形区域（位置=“堆栈”）

顺便说一句-看看顺便说一句-看看