0

こんにちは、小さな不連続時系列データ (mWL) があります。

> print(mWL)
                   dt    Q1    Q2    R1    R2 S1 S2 S3    N1    N2     O
1 2013-05-25 12:00:00    NA    NA    NA    NA NA NA NA    NA    NA    NA
2 2013-05-25 13:20:00    NA    NA    NA    NA NA NA NA    NA    NA    NA
3 2013-05-25 15:20:00    NA    NA 4.107 4.167 NA NA NA    NA    NA    NA
4 2013-05-25 15:40:00 5.833 6.405    NA    NA NA NA NA    NA    NA    NA
5 2013-05-25 17:00:00    NA    NA    NA    NA NA NA NA    NA    NA 6.957
6 2013-05-25 17:20:00    NA    NA    NA    NA NA NA NA 6.088 7.307    NA

また、「mWL」の時間測定値のいくつかを含む、かなり大きな連続 (20 分ごと) データベース (H) もあります。

tail(H,n=80)
                     time      e1
13782 2013-05-25 09:40:00 12.8452
13783 2013-05-25 10:00:00 12.8429
13784 2013-05-25 10:20:00 12.8376
13785 2013-05-25 10:40:00 12.8362
13786 2013-05-25 11:00:00 12.8338
13787 2013-05-25 11:20:00 12.8359
13788 2013-05-25 11:40:00 12.8371
13789 2013-05-25 12:00:00 12.8380
13790 2013-05-25 12:20:00 12.8355
13791 2013-05-25 12:40:00 12.8380
13792 2013-05-25 13:00:00 12.8396
13793 2013-05-25 13:20:00 12.8418
13794 2013-05-25 13:40:00 12.8403
13795 2013-05-25 14:00:00 12.8427
13796 2013-05-25 14:20:00 12.8443
13797 2013-05-25 14:40:00 12.8453
13798 2013-05-25 15:00:00 12.8460
13799 2013-05-25 15:20:00 12.8483
13800 2013-05-25 15:40:00 12.8508
13801 2013-05-25 16:00:00 12.8528
13802 2013-05-25 16:20:00 12.8547
13803 2013-05-25 16:40:00 12.8559
13804 2013-05-25 17:00:00 12.8579
13805 2013-05-25 17:20:00 12.8594
13806 2013-05-25 17:40:00 12.8613

H$e1 データを同時にマージして、サイズ 'mWL' (つまり 6 行のみ) の新しいデータ フレームを作成したいと考えています。しかし、align.time を使用しようとすると、データ フレームが大きくなり、「mWL」データが繰り返されます!!

require(xts)
Hsort<-align.time(xts(H[,2],as.POSIXct(H[,1])), n=1200)
mWLsort<-align.time(xts(mWL[,2],as.POSIXct(mWL[,1])), n=1200)
merge(H, mWLsort)

なにか提案を？？

4

1 に答える 1

2

のデフォルトallは TRUE でmerge.zoo、merge.xts(存在する場合) おそらく動物園の作成者のリードを継承またはフォローします。したがってall = c(FALSE, TRUE)、2 番目のオブジェクトにある項目のみを一致させたい場合に設定します。all(これはinのデフォルト設定とは逆なbase::mergeので、混乱したかどうかは確かに理解できます。以下を見るまではそうでした:

 help(package="zoo", merge.zoo)
 help(package="xts", merge.xts)
于 2013-07-13T21:32:52.757 に答える