r - 時系列データ行列の点のベクトルをプロット

Question

各行が 8 つの異なる時点での値のベクトルである 100*8 データ マトリックスがあります。R で次の行列をプロットして、以下のグラフと非常によく似たグラフを取得する方法を知りたいです。

これが私のデータマトリックスの例です。

           1    2        3     4    5    6    7      8
line1     0.22  0.075  0.35  0.89   0   0.35  0.42  2.34   
line2      0    0.47   0.89  2.51   0   0.36  1.14  2.09
line3     1.22  0.075  0.35  0.89   0   0.35  0.42  1.34
line4     2.22  0.75   0.45  0.99   0   0.54  0.24  2.34
line5     3.22  0.275  0.55  0.819  0   0.25  0.34  2.34

ヘルプやアドバイスをいただければ幸いです。ありがとう。

Answer 1

試してみてくださいmatplot()。デフォルトでは、列をシリーズとして扱うため、t()使用する前にデータ フレームを転置 ( ) する必要があります。これは、提供したデータのサブセットを使用した例です

timeser <- read.table(text = "           1    2        3     4    5    6    7      8
line1     0.22  0.075  0.35  0.89   0   0.35  0.42  2.34   
line2      0    0.47   0.89  2.51   0   0.36  1.14  2.09
line3     1.22  0.075  0.35  0.89   0   0.35  0.42  1.34
line4     2.22  0.75   0.45  0.99   0   0.54  0.24  2.34
line5     3.22  0.275  0.55  0.819  0   0.25  0.34  2.34", header = TRUE)

matplot(t(timeser), type = "l")

生産

Answer 2

オブジェクトをオブジェクトに変換してから、目的のプロットを取得 するためzooに使用できます。時系列クラスです。plot.zoozoo

> mat
       X1    X2   X3    X4 X5   X6   X7   X8
[1,] 0.22 0.075 0.35 0.890  0 0.35 0.42 2.34
[2,] 0.00 0.470 0.89 2.510  0 0.36 1.14 2.09
[3,] 1.22 0.075 0.35 0.890  0 0.35 0.42 1.34
[4,] 2.22 0.750 0.45 0.990  0 0.54 0.24 2.34
[5,] 3.22 0.275 0.55 0.819  0 0.25 0.34 2.34

> plot.zoo(zoo(t(mat), order.by=1:ncol(mat)), screens = 1, col = rainbow(ncol(t(mat))), ylab="Data")

これにより、