私はRにはかなり慣れていませんがscale_x_date
、パッケージ内で使用ggplot2
して論文のハイドログラフを作成しようとしています。ハイドログラフは、私が取り組んでいる川の深さである予測値と実際の値で構成されています。日付のラベルと休憩を変更できるようにしたい。これが私が持っているものです。
library(ggplot2)
library(scales)
LowerHydro<-data.frame(LowerHydrology)
LowerHydro$date <- as.Date(LowerHydro$Date, format = "%m/%d/%y")
attach(LowerHydro)
p<-ggplot(data=LowerHydro,aes(x=date,y=Depth,group=Group,color=Group))
p+geom_line()+scale_x_date(labels=date_format("%b-%y"),breaks=date_breaks("3 months"))
しかし、コードの最後の行の後に、次のエラーが表示されます。
Error in get(x, envir = this, inherits = inh)(this, ...) :
unused argument(s) (labels = function (x)
ラベル = なしで次のようにコードの最後の行を実行すると、ブレーク = だけで、エラーが発生します。
p+geom_line()+scale_x_date(breaks=date_breaks("3 months"))
Error in cut.default(days, c(0, 10, 56, 365, 730, 5000, Inf), labels = FALSE) :
'x' must be numeric
ここに私のstr(LowerHydro)があります
data.frame': 712 obs. of 3 variables:
$ Depth: num 5.24 5.14 5.42 5.27 5.27 ...
$ Group: Factor w/ 2 levels "Actual","Predicted": 2 2 2 2 2 2 2 2 2 2 ...
$ date : Date, format: "2010-10-01" "2010-10-02" ...
sessionInfo()
R version 2.13.0 (2011-04-13)
Platform: x86_64-pc-mingw32/x64 (64-bit)
locale:
[1] LC_COLLATE=English_United States.1252 LC_CTYPE=English_United States.1252
[3] LC_MONETARY=English_United States.1252 LC_NUMERIC=C
[5] LC_TIME=English_United States.1252
attached base packages:
[1] grid stats graphics grDevices utils datasets methods base
other attached packages:
[1] ggplot2_0.8.9 proto_0.3-9.2 reshape_0.8.4 plyr_1.5.2 scales_0.2.0
loaded via a namespace (and not attached):
[1] colorspace_1.1-0 dichromat_1.2-4 digest_0.5.0 munsell_0.3
[5] RColorBrewer_1.0-5 stringr_0.4 tools_2.13.0
ありがとう。