R:使用 ggplot geom_line 防止显示时间序列数据的断线

Question

我想使用 ggplot2 绘制一条在特定日期后改变颜色的线。我原以为这会很简单，但在颜色改变的地方我打断了这条线。最初我认为这是 group 的问题(根据 this 问题；this other question 也看起来相关，但不是我需要的)。搞乱了 group 美学 30 分钟，我无法修复它，所以如果有人能指出明显的错误......

代码:

require(ggplot2)

set.seed(1111)
mydf <- data.frame(mydate = seq(as.Date('2013-01-01'), by = 'day', length.out = 10),
    y = runif(10, 100, 200))
mydf$cond <- ifelse(mydf$mydate > '2013-01-05', "red", "blue")

ggplot(mydf, aes(x = mydate, y = y, colour = cond)) +
    geom_line() +
    scale_colour_identity(mydf$cond) +
    theme()

Answer 1

如果设置group=1，则所有数据点的分组值都为1，直线会连在一起。

ggplot(mydf, aes(x = mydate, y = y, colour = cond, group=1)) +
  geom_line() +
  scale_colour_identity(mydf$cond) +
  theme()