Hello,
I want to change this code, but I can't quite do it.
vd = game%>% select (Genre, Year)
require (plyr)
vd = ddply (vd,. (Genre, Year), transform, count = length (Genre))
vd = unique (vd)
detach ('package: plyr', TRUE)
ggplot (vd, aes (Year, count, group = 1, color = Genre)) + geom_line (size = 2) + theme (axis.text.x = element_text (angle = 90, vjust = 0.3), plot.title = element_text (hjust = 0.5, face = 'italic'), legend.position = "none") + ggtitle ("Video game sales through the years") + labs (x = "Year", y = "Count") + facet_wrap ( ~ Genre, scales = 'free_y', ncol = 1)
I only want to show Nintendo consoles in the genres:
"NES", "SNES", "N64", "Wii", "WiiU", "GB", "GBA", "GC", "3DS", "DS", "3DS
But I don't know how, or I can't.