Пожалуйста, найдите изображение ниже, но это то, что у меня сейчас есть:
Мне не нужно иметь отдельную легенду для каждого из сюжеты, но хотелось бы, чтобы легенда была разделена по граням. Это может быть просто отдельное название:
Ca sh крыса индикатора потока ios
Ratio xx
Коэффициент yy
Коэффициент zz
Рост крысы ios
Коэффициент aa
Коэффициент bb
Коэффициент cc
...
Есть ли у кого-нибудь предложения, как это сделать?
Спасибо !!
REPREX:
mtcars$names <- rownames(mtcars)
mtcars <- mtcars %>%
mutate(group = case_when(gear == 3 ~ "A",
gear == 4 ~ "B",
gear == 5 ~ "C"))
ggplot(data = mtcars, aes(mpg, disp, color = names, group =group)) +
geom_line(size = 1) +
geom_point()+
guides(color=guide_legend(ncol=1))+
facet_wrap(~ group)
Я хотел бы получить легенда разделена на группы A, B, C.