Автор Тема: Построение графиков и фазовых портретов в Maple  (Прочитано 12020 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн DeadChild

  • Ветеран
  • *****
  • Сообщений: 544
    • Просмотр профиля
Здравствуйте. Возникли проблемы с построением графиков и фазовых портретов. Подскажите, что я делаю не правильно?
1. Решить систему и построить графики ф-ий (t,x(t),y(t)), \( t\in [0,1] \) с начальными условиями (x(0),y(0))=({0,1,2},{0,1,2})
x'=x+2y+1
y'=4x-y
Из начального условия брала только 1 значение. Как задать 3?
restart:
sys := diff(x(t), t) = x(t)+2*y(t)+1, diff(y(t), t) = 4*x(t)-y(t);
gensol := dsolve({sys}, {y(t), x(t)});
init := x(0) = 0, y(0) = 0;
parsol := dsolve({sys, init}, {x(t), y(t)});
x1 := rhs(parsol[2]); y1 := rhs(parsol[1]);
plot({y1, x1}, t = 0 .. 1);
2. Решить систему, построить фазовые портреты на плоскости
x'=x+y
y'=3y-2x
Построила одну кривую, а сказали нужно несколько. Для этого нужны начальные условия. Их брать любыми?
restart:
with(DEtools);
sys := diff(x(t), t) = x(t)+y(t), diff(y(t), t) = 3*y(t)-2*x(t);
gensol := dsolve({sys}, {x(t), y(t)});
sys := eq1, eq2;
eq1 := diff(x(t), t) = x(t)+y(t);
eq2 := diff(y(t), t) = 3*y(t)-2*x(t);
dsolve({eq2, eq1});
DEplot([sys], [x(t), y(t)], t = 0 .. 1, {[x(0) = 2, y(0) = 3]}, stepsize = .1, linecolor = blue);
3. Решить систему (n=3), построить фазовый портрет в 3-мерном пространстве.
x'=2x+2z-y
y'=x+2z
z'=y-2x-z
Использовать implicitplot3d или что?
restart:
sys := diff(x(t), t) = 2*x(t)+2*z(t)-y(t), diff(y(t), t) = x(t)+2*z(t), diff(z(t), t) = y(t)-2*x(t)-z(t);
gensol := dsolve({sys}, {x(t), y(t), z(t)});
4. Построить точку В, симметричную точке А относительно L.
A=(-2,1,3)
L: x-2/3 = y-1/0 = z+4/1
Руками я нашла эту точку А'(3,1,-12). Как сделать это в Maple? Я могу только примерно построить график.
with(geometry):
 with(geom3d);
 with(plots):
 with(plottools):
A1 := pointplot3d({[-2, 1, 3], [3, 1, -12]}, axes = normal, symbol = box, color = black);
A2 := curve([[.5, 1, -4.5], [(-10)+.5, 10+1, (-10)-4.5]], color = red);
A3 := curve([[-2, 1, 3], [3, 1, -12]], color = blue);
display({A3, A1, A2}, axes = boxed, scaling = constrained);

 

Помогите правильно реализовать в маткаде функцию с построение графика

Автор sab

Ответов: 0
Просмотров: 4030
Последний ответ 05 Июня 2012, 21:08:10
от sab
Создание цикла внутри цикла в ПП Maple

Автор Andrej211091

Ответов: 0
Просмотров: 4358
Последний ответ 30 Марта 2013, 08:23:32
от Andrej211091
Построение графика в Тurbo Pascal

Автор Мария_1

Ответов: 8
Просмотров: 5522
Последний ответ 27 Мая 2011, 20:44:47
от Selyd
В Maple создать процедуру приведения кривых второго порядка к каноническому виду

Автор Keterinka

Ответов: 1
Просмотров: 8314
Последний ответ 19 Января 2015, 23:38:25
от tig81
Maple помощь с непростой функцией в частном виде

Автор Tilesto

Ответов: 0
Просмотров: 8740
Последний ответ 14 Мая 2015, 14:41:43
от Tilesto