r - 在x轴上的日期之间提供阴影

This question already has answers here:

Make the background of a graph different colours in different regions

(3个答案)


3年前关闭。




我在R中有一个图，在X轴上有日期/时间(POSIXct)，在Y轴上有一些数据。
我想在x轴上的每个日期的下午3点到6PM之间提供x轴上的阴影

最佳答案

或多或少跟随Brian Diggs suggests above，

#sample data
set.seed(666)
dat <- data.frame(x = seq(as.POSIXct('2011-03-27 00:00:00'),
len= (n=24), by="1 hour"), y = cumsum(rnorm(n)))
#Breaks for background rectangles
rects <- data.frame(xstart = as.POSIXct('2011-03-27 15:00:00'),
xend = as.POSIXct('2011-03-27 18:00:00'))

library(ggplot2)
ggplot() +
  geom_rect(data = rects, aes(xmin = xstart, xmax = xend,
            ymin = -Inf, ymax = Inf), alpha = 0.4) +
  geom_line(data = dat, aes(x,y))

会给你这个

关于r - 在x轴上的日期之间提供阴影，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/10542326/