1

私は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

ありがとう。

4

0 に答える 0