! グラフの軸に日付を入れる場合

日次の推移に限らず、横軸に日付型のデータをとると、全部の日付が表示されて、真っ黒になる。

これを回避するために、scale_x_date()のオプションで月を指定する使う。

 scale_x_date(break = "month", date_label = "%Y%m")

なおこれとは別に、グラフ本体の色を月別に塗りたいような場合には、
 mutate( ym = floor_date(日付型項目, "month") %>% as.factor()  )
として月別の項目名を別に用意しておいたほうが便利。