假設我有一個包含 n 行的折線圖。每條線都有一個對應的 x 軸值，我希望在特定事件之前和之后使用不同的顏色。
例如，每個人一開始都是綠色的，但是當他們有事件時，線條顏色會變為紅色。
我能夠使用回圈在基礎中找到解決方案，尋找基礎或 ggplot 解決方案。
uj5u.com熱心網友回復：
lines <- data.frame(id = rep(c("A","B"), each = 5),
x = 1:5,
val = 1:10)
events <-data.frame(id = c("A","B"),
time = c(3, 4))
library(tidyverse)
lines %>%
left_join(events) %>%
group_by(id) %>%
mutate(status = if_else(x < time, "before", "after")) %>%
ggplot(aes(x, val, color = status, group = id))
geom_line(size = 4)
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/427626.html