Mathematica：如何在同一圖形中垂直繪製多行矩陣

-1

我創建了一個名爲Theta的數組，其中包含100行和400列。每個條目都是一個數字。我想要做的就是在線路100繪出Mathematica：如何在同一圖形中垂直繪製多行矩陣

0.01，對每一個數字在1號線

0.02 VS每號線2條

圖...

1對每一個數字

所以基本上每條線都是垂直繪製的。

我可以爲每一行做到這一點，但我不知道如何爲它們同時做到這一點。手工完成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]

來源

2012-10-19 migasll

有點疑惑在這裏，您發佈的代碼的第二部分似乎有一些語法問題。特別是'Line'是Mathematica中的一個保留符號，所以'Line [g] = ...'會引發錯誤。第一段代碼創建一個形式爲'{{Theta [1] [1]，Theta [1] [2]，Theta [1] [3]，...}，{Theta [2] [1]，Theta [2] [2]，...}，...}'，它們不是數字值。你很高興它按照你的意圖工作嗎？ –

下面是一個使用稍小的10行隨機數的40列的例子回答繪製在0.1，0.2，0.3，... ，而不是0.01間隔。

data = Table[x + RandomReal[5], {x, 1, 10}, {y, 1, 40}];

下面是數據繪製：

ListPlot[ MapThread[ Function[x, {#2, x}] /@ #1 &, {data, Range[0.01, 1, .1]}]]

來源

2012-10-19 08:30:52

Mathematica：如何在同一圖形中垂直繪製多行矩陣

回答

相關問題