Я создаю график с несколькими группами и рисую geom_boxplot () на множестве линий. Однако было бы неплохо раскрасить прямоугольники прозрачно, чтобы были видны линии.
Вот несколько примеров данных:
x11()
name <- c("a", "a", "a", "a", "a", "a","a", "a", "a", "b", "b", "b","b", "b", "b","b", "b", "b")
class <- c("c1", "c1", "c1", "c2", "c2", "c2", "c3", "c3", "c3","c1", "c1", "c1", "c2", "c2", "c2", "c3", "c3", "c3")
year <- c("2010", "2009", "2008", "2010", "2009", "2008", "2010", "2009", "2008", "2010", "2009", "2008", "2010", "2009", "2008", "2010", "2009", "2008")
value <- c(100, 33, 80, 90, 80, 100, 100, 90, 80, 90, 80, 100, 100, 90, 80, 99, 80, 100)
df <- data.frame(name, class, year, value)
df
Я рисую график с помощью:
p1 <- ggplot(df, aes(year, value))
p1 <- p1 + geom_line(aes(group=name, size=name),colour="#ff2300",alpha=0.5) + facet_wrap(~ class, scales = "free_y")
p1 <- p1 + geom_boxplot(aes(group=name))
print(p1)
И в моей системе ширина линии в легенде отображается неправильно. Я делаю что-то неправильно? Заранее спасибо!