R
ggplot2
!!!geom_line

!!注意点
! x軸のデータは、数値でないといけない
 dat$Year <- as.numeric(dat$Year)

!!線の種類を自動的に変える
 geom_line(aes(linetype=グループ))

* グループの数に応じて、線の種類を自動的に調整してくれる
** 片方は実線、もう片方は破線