使用不同颜色填充位于y轴上方和下方的多边形（R语言）

使用不同颜色填充位于y轴上方和下方的多边形（R语言）

在R语言中，我们可以使用ggplot2包来创建精美的图形，并使用不同的颜色填充位于y轴上方和下方的多边形。下面是一份详细的代码示例，展示如何实现这一目标：

首先，确保你已经安装了ggplot2包，如果没有，请使用以下命令安装：

install.packages("ggplot2")

接下来，加载ggplot2包：

library(ggplot2)

为了说明这个问题，我们创建一个简单的数据集，其中包含x和y坐标的值。这里我们使用一些随机生成的数据：

# 创建数据集
set.seed(1)
df <- data.frame(x = 1:10, y = runif(10, 1, 10))

现在，我们可以使用ggplot函数创建一个基本的散点图，并在其中添加两个多边形图层。一个多边形将填充位于y轴上方的区域，另一个多边形将填充位于y轴下方的区域。

# 创建基本散点图
p <- ggplot(df, aes(x, y)) +
  geom_point()

# 添加位于y轴上方的多边形
p <- p + geom_polygon(data = df[df$y >= 5, ], aes(x, y), fill = "blue")

# 添加位于