Как сделать много сюжетов, с функциями For и Plot? - PullRequest
Новая
       23

Как сделать много сюжетов, с функциями For и Plot?

0 голосов
/ 10 октября 2018

Мне нужно сделать несколько сюжетов, и я пытаюсь сделать это с помощью For.Мои данные: 

0.0023709,8.5752e-007,4.847e-008

Мой код: 

column1 = data[[All,1]]
For[i = 1, i < 4, Plot[column1[[i]]*t, {t, 0, 10}]]

После запуска Mathematica напишите «Running» и все.Я хочу сделать несколько графиков для некоторых списков и экспортировать их.Пожалуйста, помогите мне решить эту проблему.

1 Ответ

0 голосов
/ 10 октября 2018

Во-первых, используя For как ваш код. 

data = {{1, 0}, {2, 0}, {3, 0}};
output = {};
column1 = data[[All, 1]];
 For[i = 1, i < 4, i++,
  AppendTo[output,
   ListPlot[Table[column1[[i]]*t, {t, 0, 10}]]]]
output

Во-вторых, эквивалентный метод. 

output = Table[ListPlot[Table[column1[[i]]*t, {t, 0, 10}]], {i, 1, 3}]
...