-1

これは私が読んでいる本の図です：

ここに画像の説明を入力

Rを使用してこの表形式のデータをグラフ化しようとしています.

これは私がこれまでに持っているものです:

a <- c(1000 , 5 , 1050 , 1050 , -2 , 1029 , 1029 , 4 , 1070 , 1070 , -3 , 
1038 , 1038 , 2 , 1059 , 1059 , 4 , 1101)
matrix(a , 3 , 6)

このコードは次を返します。

 [,1] [,2] [,3] [,4] [,5] [,6]
[1,] 1000 1050 1029 1070 1038 1059
[2,]    5   -2    4   -3    2    4
[3,] 1050 1029 1070 1038 1059 1101

を使用してこのデータをプロットしようとすると:

> plot(matrix(a , 3 , 6))

これは結果です：

ここに画像の説明を入力

このグラフはあまり役に立ちません。「R」は初めてです。「R」を使用して生成できる、より興味深いグラフはありますか? 「Y」軸に「ETF A」の列を、「X」軸に「リターン（増加率または減少率）、残高、年末）」の線を 2 本の線でプロットするように、これを修正するにはどうすればよいでしょうか。

4

1 に答える 1

2

これはどう：

a <- c(1000 , 5 , 1050 , 1050 , -2 , 1029 , 1029 , 4 , 1070 , 1070 , -3 , 
     1038 , 1038 , 2 , 1059 , 1059 , 4 , 1101)
x <- matrix(a , 3 , 6)

# make it a data.frame :)
z <- data.frame(b = c(x[1, ], x[3, ]), year = c(rep(0, 6), rep(1, 6)))

# make a mysterious plot
plot(z[, 2], z[, 1]) + segments(x0=z[1:6, 2], y0=z[1:6, 1], x1=z[7:12, 2], y1=z[7:12, 1])

ここに画像の説明を入力してください

xラボとyラボ、タイトルなどを変更するために編集を行うことができます。コンソールに？parと入力すると、多くのオプションが表示されます。傾きは、パーセンテージの増減に非常に密接に関連しています。:)

于 2013-03-07T22:42:06.913 に答える