私は R を数年間使用してきましたが、これには本当に助けが必要です。時系列データは私の基準ではありません。いくつかの背景として、このデータは、ランドスケープ内のさまざまなサイズのパッチに植えられた温度を記録する I ボタンから取得されます。私のデータは一般的に次のようになります。
Ibutton_new.csv:
Date Edge1 Edge2 Edge3...
2012-7-16 25 24 24.5
2012-7-16 24 23 23
2012-7-16 23.5 22.5 22.5
2012-7-16 27.5 24.5 24.5
2012-7-16 27 27.5 26.5
2012-7-16 27 26.5 27
2012-7-17 26 25 25
2012-7-17 25 25 25
2012-7-17 24 23 23
2012-7-17 24 23 23
2012-7-17 28 29 27.5
2012-7-17 28 28 28
etc for a year
ステップ 1: データを xts オブジェクトに変換します。
library(zoo)
library(xts)
x<-read.csv("Ibutton_new.csv")
x$Date <- mdy(x$Date)
x.xts <- xts(x[,-1], order.by=x[,1])
class(x.xts)
[1] "xts" "zoo"
str(x.xts)
An ‘xts’ object on 2012-07-16/2013-06-22 containing:
Data: num [1:2048, 1:114] 25 24 23.5 27.5 27 27 26 25 24 28 ...
- attr(*, "dimnames")=List of 2
..$ : NULL
..$ : chr [1:114] "edge_1" "edge_2" "edge_3" "edge_4" ...
Indexed by objects of class: [Date] TZ: UTC
xts Attributes:
NULL
ステップ2：グラフを作る
windows()
plot(x.xts,col=color1,main="Soil Temperature (C) Across Whole
Site",lwd=2,ylim=c(-10,50),cex.axis=1.5)
わかりました、一般的に、私はこれにかなり満足しています.x軸が醜いことを除いて. 日付の値にタイムスタンプを付ける理由がわかりません。月ごとに目盛りとラベルを付けたいだけです。だから私はこれを試しました：
plot(x.xts,col=color1,main="Soil Temperature (C) Across Whole
Site",lwd=2,ylim=c(-10,50),cex.axis=1.5,major.ticks="months",grid.ticks.on="months")
グリッド線と目盛りはきれいに見えましたが、ラベルは同じままでした。それから私はこれを試しました：
plot(x.xts,xaxt="n",col=color1,main="Soil Temperature (C) Across Whole
Site",lwd=2,ylim=c(-10,50),cex.axis=1.5)
ticks <- axTicksByTime(x.xts,"months",format.labels="%b-%Y")
axis(1,at = .index(x.xts)[ticks], labels = names(ticks),mgp=c(0,0.5,0))
そして陽気にこれを手に入れました：
だから私はとても近くにいますが、そこにはいません。助言がありますか？通常、これをパワーポイントにインポートして編集します。高品質の写真をエクスポートできるアドオンを持っていますが、私のコンピューターは現在修理工場にあります。また、R に負けたような気分になるのも嫌いです。簡単な解決策や何かばかげたことがあると確信していますが、表示されていません。おそらく、ステップ 1 のフォーマットの問題でしょうか? 適切な xts オブジェクトを作成できるようになるまで、私は永遠にかかりました。繰り返しますが、私は通常、このタイプのデータまたはパッケージを扱いません。前もって感謝します！