! グラフの軸の表示桁数を３桁＋記号にする

 scale_x_continuous(labels = label_number_si())

で、KMBTの単位がつく

また、

  scale_y_continuous(
     labels = scales::number_format(
          accuracy = 0.1, 
          big.mark = ",", 
          decimal.mark = ".", 
          scale = 1e-6,
          suffix = "兆円"
      )
    ) 

で、百万円単位で作られた数字を、兆円単位で表示できる

!グラフのラベルの表示範囲と区間を決める

たとえば、-0.25から+0.10までの範囲を、0.05刻みで表示したければ、

  breaks = seq(-.25, .10, .05)

を使って、

  scale_y_continuous(breaks = seq(-0.25, 0.1, 0.05), labels = scales::label_percent())