[软件熟悉度]:
入门(写过其他程式，只是对语法不熟悉)
[问题叙述]:
最近趁著寒假想把R处理资料的基础学完，目前还在学习dplyr,ggplot2
在自我练习时，自己输入资料像这样
code:
NTU_pop<-data.frame(c(106,105,104,103,102,101,100,99,98,97),c(16526,16499,16532,16505,16575,16915,17277,17514,17492,17152),c(9377,9403,9441,9425,9456,9609,9703,9770,9774,9504),c(7149,7096,7091,7080,71
names(NTU_pop)<-c("year","total","boy","girl")
资料呈现:
year total boy girl
1 106 16526 9377 7149
2 105 16499 9403 7096
3 104 16532 9441 7091
4 103 16505 9425 7080
5 102 16575 9456 7119
5 102 16575 9456 7119
6 101 16915 9609 7306
7 100 17277 9703 7574
8 99 17514 9770 7744
9 98 17492 9774 7718
10 97 17152 9504 7648
然后我想画出x轴是年分，y轴是人数，然后再用颜色区分总人数男女人数
但这样的资料好像没办法使用ggplot里面的fill
我只能像这样:
arrange(NTU_pop,year)%>%ggplot(aes(x=year,y=total))+geom_point()+geom_line()+
geom_point(aes(x=year,y=boy),color="red")+
geom_line(aes(x=year,y=boy),color="red")+
geom_point(aes(x=year,y=girl),color="blue")+
geom_line(aes(x=year,y=girl),color="blue")
不管我再怎么修改程式码都没办法让标签显示出来，像是说
红色:boy,蓝色:girl,黑色:total
我上网爬过很多文了大部分都是用fill，
所以想请问各位大大如何解决了QQ
[环境叙述]:
Win10, 64bit
R:Version 1.1.383

https://pastebin.com/0STrjnFW可以用 melt 将资料转换成长格式再搭配 scale 换颜色一行一行打的话也可，但要让 aes 吃到 col 这个参数