时间戳

首页 > 解决方案 > 将透明块带添加到 ggplot 以获取 y 范围

r - 将透明块带添加到 ggplot 以获取 y 范围

问题描述

我正在尝试为以下 y 范围向我的 ggplot 添加四个透明带：

我不希望范围重叠，因为这会改变我分配给每个波段的颜色（因为它们是透明的）。

我可以得到我使用后的效果geom_area（见下面的代码），但它们重叠，这会改变颜色。

我想知道是否有更好的方法可以让乐队专门在我想要的区域？

 df <- data.frame(y1=rep(1.99, 100),
                  y2=rep(1.49, 100),
                  y3=rep(0.99, 100),
                  y4=rep(0.49, 100),
                  x =1:100)

 ggplot(aes(x=x), data = df) + 
   geom_area(aes(y=ifelse(y1<2 & y1>1.5, y1, 0)), data=df, fill="yellow", alpha = 0.3) +
   geom_area(aes(y=ifelse(y2<1.5 & y2>1, y2, 0)), data=df, fill="darkgoldenrod1", alpha = 0.3) +
   geom_area(aes(y=ifelse(y3<1 & y3>0.5, y3, 0)), data=df, fill="darkorange1", alpha = 0.3) +
   geom_area(aes(y=ifelse(y4<0.5 & y4>0, y4, 0)), data=df, fill="darkred", alpha = 0.3) +
   theme_classic()

另外，可能是单独的问题，有没有办法让填充颜色一直到轴，而不是仅仅在它周围留下一个白色缓冲空间？

标签： rggplot2

解决方案

geom_rect在绘制任何点之前使用

ggplot() + 
  geom_rect(aes(xmin = -Inf, xmax = Inf, ymin = 1.5, ymax = 2), fill="yellow", alpha = 0.3) +
  geom_rect(aes(xmin = -Inf, xmax = Inf, ymin = 1, ymax = 1.5), fill="darkgoldenrod1", alpha = 0.3) +
  geom_point(data = df, aes(x = x, y = y1)) +
  theme_classic()

请参阅geom_rect 和 alpha - 这是否适用于硬编码值？让 alpha 与矩形一起正常工作。

推荐阅读