ggplot2でx軸ティックを月末に設定するにはどうすればよいですか？

Question

ggplot2でx軸のティックを月末に設定しようとしています。現在生成されたプロットには、最初の月に対応するティックがあります。私はスケールを生成するために使用していたコードは、私は私の限界は月なので、それはダニも月が終わるだろう終わると思っているだろう

p + scale_x_date(limits = c(as.Date("2006-12-31"), as.Date("2014-09-30")), date_breaks = "6 months", date_labels = "%Y-%m-%d") 

です。さらに、私のデータは2007年1月2日に始まり、最初のティックは2007年2月1日です。私は四半期終了に合わせてティックを設定したいと思います。

ありがとうございます！

Answer 1

のbreaks引数に日付のベクトルを指定して、明示的に軸の区切りを指定する方法があります。あなたは再現可能な例を提供していないので、私はいくつかの偽のデータをプロットしました。以下のコードでは、四半期ごとに休憩を指定しました。私は30日の各月から1日を引く必要があったので、休憩は次の四半期の初日ではなく、四半期の最終日になるでしょう。

# Fake data 
dat = data.frame(date=seq(as.Date("2006-12-31"), as.Date("2014-09-30"), by="1 day")) 
set.seed(495) 
dat$value = cumsum(rnorm(nrow(dat))) 

ggplot(dat, aes(date, value)) + 
    geom_line() + 
    scale_x_date(limits = c(as.Date("2006-12-31"), as.Date("2014-09-30")), 
       breaks = seq(as.Date("2006-03-31"), as.Date("2014-12-31"), "quarter") - c(0,1,1,0), 
       date_labels = "%Y-%m-%d", expand=c(0,30)) + 
    theme(axis.text.x=element_text(angle=-90, vjust=0.5))