ggplot2 категориальных данных - оттенок серого/тема BW для повышения удобочитаемости

Question

Я пытаюсь построить график по группам в R, используя ggplot2 следующим образом. Он предназначен для печати в градациях серого.

library(ggplot2) 

# Summarise data 
mry <- do.call(rbind, by(movies, round(movies$rating), function(df) { 
    nums <- tapply(df$length, df$year, length) 
    data.frame(rating=round(df$rating[1]), year = as.numeric(names(nums)), number=as.vector(nums)) 
})) 

p <- ggplot(mry, aes(x=year, y=number, colour=factor(rating))) 
p + geom_line() + scale_color_grey() + theme_bw() 

Однако ясность отсутствует в полученном участке, поскольку есть 10 групп, участвующих. Как настроить цвет/стиль pch/line в ggplot2 для лучшей читаемости в таком случае, когда задействовано большое количество групп?

Answer 1

я был бы склонен использовать фасетки, как это:

ggplot(mry, aes(x=year, y=number))+ 
    geom_line() + 
    scale_color_grey() + 
    theme_bw() + 
    facet_grid(rating~.) 

Очевидно, что это будет лучше в портретном режиме, но даже в этом маленьком масштабе вы можете сказать, что рейтинги 1,2,3,9 и 10 крайне редки, а наиболее распространенные рейтинги - 6 и 7 (по крайней мере, недавно). Это намного больше, чем вы можете получить от построения всего, что находится поверх друг друга.

Answer 2

Возможность улучшить читаемость - использовать linetype вместо colour. Но все же, 10 групп, вероятно, слишком много. Вы могли бы попытаться добавить различные формы точек с geom_point

p <- ggplot(mry, aes(x=year, y=number, linetype =factor(rating))) 
p + geom_line() + scale_color_grey() + theme_bw()