R - цвет подсветки для каждой строки

Question

У меня есть фрейм данных в этом формате:

df <- data.frame(
  id = c(1,1,1,2,2,2,3,3,3,4,4,4),
  time = c(1,2,3,1,2,3,1,2,3,1,2,3),
  value = c(1,3,5,2,4,6,3,5,7,1,4,7)
)

Я хочу создать отдельные графики, выделяя каждый id и с другими невыделенными ids, закрашенными серым. 1008 * Я изучил пакет gghighlight, который может выделять одну строку. Однако я хочу иметь по одному графику для каждого id (1,2,3,4,etc...).

Есть ли умный и умный способ сделать это быстро? Может ли facet_grid достичь этого?

Answer 1

И facet_wrap, и facet_grid обрабатывают фасетирование на id.

ggplot(df) + 
  geom_line(aes(x = time, y = value, color = as.factor(id))) + 
  gghighlight::gghighlight() +
  facet_wrap(~id)