R ggplotカスタムグリッド

Question

私は値をプロットし、グラフのグリッドを調整して、x軸で毎週日曜日にメイングリッドが降り、毎日マイナーグリッドを維持するようにします。 y軸上では、すべてのユニットにメジャーグリッドを持ちたいと思います。マイナーグリッドはありません。

次の例では、デフォルトグリッドを使用して、各軸に2単位ごとにメジャーグリッドを配置します（メジャーグリッドのみを変更できる場合は実際にはOK）。これをどうすれば解決できますか？

require(ggplot2) 
data <- data.frame(date = seq(as.Date("2016-05-02"),as.Date("2016-05-16"),2), 
       age_in_days = seq(1,15,2))) 

ggplot(data=data,aes(x=date,y=age_in_days)) + geom_line() 

Answer 1

xにscale_x_dateを使用する必要があります。

以下のように動作させるには、ライブラリ "scale"を読み込む必要があります。 何らかの理由で、デフォルトの日付書式が変更され、最後の行が必要になる前にそのまま保管してください。

library(scales) 
ggplot(data=data,aes(x=date,y=age_in_days)) + geom_line() + 
    scale_x_date(breaks = seq(Sys.Date(), as.Date("2016-08-01"), by="1 week"), 
labels = date_format("%b %d"))