!!!ggrepel グラフにラベルを付ける。
* geom_text() でもつけられるが、ラベルが重なったりしてしまう。
* こちらは、ラベルが重ならないように配置してくれる。

!基本 geom_text_repel(aes(label = name))

!縦横の位置指定 aes(label=name, vjust = 0, hjust = 1.2)

!特定のポイントだけにつける data=specific_points
* ggplotのまえに、どのポイントかを指定しておく
{{pre
specific_points <- tmp %>%
  filter(Time == "3b")
（中略）
geom_text_repel(data=specific_points, aes(label = name, hjust = -1.2)) 
}}


!Reference
https://id.fnshr.info/2017/03/19/ggrepel/