Программа для построения графиков с несколькими шкалами

[degtyar2000]

Подскажите, пожалуйста, программу для построения графиков, на которой можно построить один график с несколькими шкалами и соответственно построить на этом одном графике несколько зависимостей для каждой из шкал. Нельзя ли это сделать в mathematice? Заранее спасибо за ответы.

[Leierkastenmann]

В Математике можно сделать много чего, это в том числе, но придется поморочиться. Если конкретизируете задачу, то постараюсь подсказать как именно это сделать в Математике.

[degtyar2000]

Ну к примеру я знаю функции для построения трех зависимостей и мне нужно в mathematica построить на одном графике что-то похожее на это http://s2.itrash.ru/idb/49dba8116ee3459ac111929940326db5/o11111.jpg

[Ubuntu_linux]

degtyar2000 в сообщении #402165 писал(а):

Ну к примеру я знаю функции для построения трех зависимостей и мне нужно в mathematica построить на одном графике что-то похожее на это http://s2.itrash.ru/idb/49dba8116ee3459ac111929940326db5/o11111.jpg

Этот график я делал вручную (писал код на С++), так как у меня очень много данных, а так можно автоматизировать процесс.

А вообще построить можно например Qtiplot (кросплатформенний инструмент ) http://soft.proindependent.com/qtiplot.html
Просто надо масштабировать данные под одну ось.

[Leierkastenmann]

degtyar2000 в сообщении #402165 писал(а):

Ну к примеру я знаю функции для построения трех зависимостей и мне нужно в mathematica построить на одном графике что-то похожее на это http://s2.itrash.ru/idb/49dba8116ee3459ac111929940326db5/o11111.jpg

Ну раз у вас более двух осей, то я вижу один выход - рисовать оси самостоятельно. Последовательность действий, для построения двух графиков приблизительно следующая: масштабируете функции, так чтобы они все помещались на одном графике, изображаете их просто при помощи Plot, раскраска и все остальное прочее при помощи опций Plot. При построении отключаете ось y Axes -> {True, False}.
Затем отдельно для каждой функции программируете ее ось, примерно как-нибудь вот так:

s = -0.5;
y0 = -1;
y1 = 1;
ticks= Table[{{s - 0.05, y0 + 0.1*i}, {s + 0.05, y0 + 0.1*i}}, {i, 0, 
    20}];
labels = Table[{ToString[ticks[[i, 1, 2]]], {ticks[[i, 1, 1]] - 0.18, 
     ticks[[i, 1, 2]]}}, {i, Length[ticks]}];

g = Plot[Abs[Sin[x]], {x, 0, 10}, Axes -> {True, False}, 
  PlotRange -> {{-1, 10}, Automatic}];
gaxe = Graphics[Line[{{-0.5, -1}, {-0.5, 1}}]];
gticks = Graphics[Line[#] & /@ ticks];
glabels = Graphics[Text[Sequence @@ #] & /@ labels ];
Show[g,gaxe,gticks, glabels ]

И аналогично остальные оси где вам угодно и с какими угодно подписями. Все остальные красоты регулируются опциями Graphics и Plot.

[abalakin]

Может имеется в виду это http://mathgl.sourceforge.net/mathgl_en ... xes-sample ?