我正在尝试形象化婴儿名字数据集,该数据集本身每年(从1880年到2017年)都从单独的文件中合并,因此它包含“年份”列的重复值。这是我的代码:
library(ggplot2)
colorPallete <- c("orange", "blue")
ggplot(dataset, aes(x=year, y = births, colour = sex, group = sex)) +
stat_summary(fun.y = sum, geom="line") + theme(legend.position = "right")
ggtitle("Total births by sex and year") + scale_colour_manual(values = colorPallete)
这是我的数据示例: dropbox.com/s/4sgrqp7o3aza4gn/dataset.csv?dl=0
这是我目前拥有的: https://i.imgur.com/6lkhNVX.jpg
这是我要实现的目标: https://i.imgur.com/KERruOQ.jpg