Две шкалы

Форум пользователей пакета Mathematica

Модератор: Admin

ilyaZlatkin
Сообщения: 7
Зарегистрирован: Пн сен 14, 2009 6:46 pm
Контактная информация:

Две шкалы

Сообщение ilyaZlatkin » Ср май 12, 2010 2:21 pm

Как постоить на одной картинке два графика совершенно разного масштаба?
То есть, ось x одна, а ось y для каждой кривой своя ?

Или может существует возможно наложения графиком?

VFaraon
Сообщения: 15
Зарегистрирован: Вс окт 11, 2009 4:01 pm

Сообщение VFaraon » Ср май 12, 2010 2:41 pm

Код: Выделить всё

g1=Plot[Sin[x], {x, 0, 2 Pi}]

g2=Plot[2 Cos[x], {x, 0, 2 Pi}]

Show[g1, g2]

ilyaZlatkin
Сообщения: 7
Зарегистрирован: Пн сен 14, 2009 6:46 pm
Контактная информация:

Сообщение ilyaZlatkin » Ср май 12, 2010 4:41 pm

VFaraon писал(а):

Код: Выделить всё

g1=Plot[Sin[x], {x, 0, 2 Pi}]

g2=Plot[2 Cos[x], {x, 0, 2 Pi}]

Show[g1, g2]

Но это все равно что

Plot[{Sin[x],2 Cos[x]}, {x, 0, 2 Pi}]

Мне нужно чтобы масштаб не сохранялся.Типо как слайды наложить. Или построить график температуры и давления от времени на одной картинке.
Например, шкала от 0 до 1000 для одной кривой, и от 0 до 1 для другой.

Leierkastenmann
Сообщения: 20
Зарегистрирован: Вс янв 17, 2010 1:21 pm

Сообщение Leierkastenmann » Ср май 12, 2010 9:12 pm

Рисуете все графики в сопоставимом масштабе, а потом при помощи Ticks и TicksStyle вручную или какой-нибудь функцией по оси ординат расставляете значения, можно разными цветами повыделять их, чтобы наглядней было.
Что-нибудь типа такого

Код: Выделить всё

Plot[{100*Sin[x], x^2}, {x, 0, 10},
 Ticks -> {Automatic, {{-50, -0.5}, {50, -0.5}, {-100, -1}, {100,
     1}, {90, 90}, {110, 110}, {30, 30}}}, PlotRange -> {-110, 110},
 AspectRatio -> 1]

Здесь я как бы расположил Sin(x) и x^2 на одном графике.

Gordon
Сообщения: 300
Зарегистрирован: Вт сен 08, 2009 8:16 pm

Сообщение Gordon » Ср май 12, 2010 11:43 pm

Длину Ticks можно увеличить

Код: Выделить всё

Plot[{100*Sin[x], x^2}, {x, 0, 10},
 Ticks -> {Automatic, {{-50, -0.5, 0.05}, {50, -0.5, 0.05}, {-100, -1,
      0.05}, {100, 1, 0.05}, {90, 90}, {110, 110}, {30, 30}}},
 PlotRange -> {-110, 110}, AspectRatio -> 1]

еще тут посмотрите http://forums.wolfram.com/student-support/topics/18944
http://groups.google.com/group/comp.sof ... dac10ea955