-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”轴上的“回报(增加或减少百分比)、“余额、年终”行?

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 回答