その他の ggplot2 レイヤー
このデータは折れ線グラフで表示できますが、各年を1つの点として表す散布図にすることもできます。その場合は、レイヤー（つまり geom_line() から geom_point() への変更）を入れ替える必要があります。
さらに、geom_smooth() を使って平滑化曲線などのレイヤーをグラフに追加することもできます。
この演習はコースの一部です
ケーススタディ：Rで行う探索的データ分析
演習の手順
プロットを散布図に変更し、平滑化曲線を追加してください。
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# Change to scatter plot and add smoothing curve
ggplot(by_year, aes(year, percent_yes)) +
geom_line()