Как организовать несколько участков подряд в Mathematica? - PullRequest
Новая
       21

Как организовать несколько участков подряд в Mathematica?

0 голосов
/ 25 января 2019

У меня есть графики, которые выглядят следующим образом: 

Plot1 = Plot[Evaluate[{A[t]} /. Solve], {t, 0, xaxis}, 
  AspectRatio -> 1, PlotLegends -> {"A"}, PlotStyle -> {Green}]
Plot2 = Plot[Evaluate[{B[t]} /. Solve], {t, 0, xaxis}, 
  AspectRatio -> 1, PlotLegends -> {"B"}, PlotStyle -> {Blue}]
Plot3 = Plot[Evaluate[{C[t]} /. Solve], {t, 0, xaxis}, 
  AspectRatio -> 1, PlotLegends -> {"C"}, 
  PlotStyle -> {Orange}]
Plot4 = Plot[Evaluate[{D[t]} /. Solve], {t, 0, xaxis}, 
  AspectRatio -> 1, PlotLegends -> {"D"}, 
  PlotStyle -> {Red}]

Обратите внимание, что у графиков есть свободные ограничения по осям ... и я хочу, чтобы это так и оставалось. Я хочу расположить все графики в линейный ряд, чтобы я мог разместить его на экране. Я попытался Table, как предложено в других ответах, но, похоже, не работает. Какие-либо предложения?

...