我创建了一个名为 Theta 的数组,它有 100 行和 400 列。每个条目都是一个数字。我想要做的是绘制的图表
0.01 与第 1 行中的每个数字
0.02 与第 2 行中的每个数字
...
1 与第 100 行中的每个数字
所以基本上每条线都是垂直绘制的。
我可以为每一行执行此操作,但我不知道如何同时为所有行执行此操作。并且手工完成所有 100 行肯定不是要走的路。
到目前为止,我的代码是:
data = Table[Theta[i][j], {i, 100}, {j, 400}];
Line1 = Table[data[[1, i]], {i, 1, 400}];
ListPlot[{MapIndexed[{0.01, #} &, Line1]]
编辑:好的,我终于做到了。
如果有人有兴趣,这里是:
data = Table[Theta][i][j], {i, 100}, {j, 400}];
final = {};
For[g = 1, g < 100, g++,
Line[g] = MapIndexed[{0.01*g, #} &, Table[data[[g, i]], {i, 1, 400}]];
final = Join[final, Line[g]];
]
ListPlot[final]