2014 dxdy logo

Научный форум dxdy

Математика, Физика, Computer Science, Machine Learning, LaTeX, Механика и Техника, Химия,
Биология и Медицина, Экономика и Финансовая Математика, Гуманитарные науки




Начать новую тему Ответить на тему
 
 Диференциальное уравнение в Mathematica
Сообщение25.05.2009, 19:30 


25/05/09
1
Есть уравнение, которое приобразовано с модели хищник-жертва
$x'=(a-by)x , 
y'=(-c+dx)y$
Его можно решить и смоделировать в Matematica.
Вот код решения:
$a = 4; b = 5/2; c = 2; d = 1;
NDSolve[{x'[t] == (a - by[t])x[t], 
y'[t] == (-c + dx[t])y[t],  
x[0] == 3, y[0] == 1}, {x[t], y[t]}, {t, 0, 10}]$
выводит оно такое:
${{x[t] -> InterpolatingFunction[{{0., 10.}}, <>][t],  y[t] ->InterpolatingFunction[{{0., 10.}}, <>][t]}}$

Вопрос таков: Как мне вывести конкретное значение х или y в момент времени 5 или 10?
Заранее спасибо.

 Профиль  
                  
 
 Re: Диференциальное уравнение в Mathematica
Сообщение25.05.2009, 23:44 
Заслуженный участник


22/01/07
605
Например, так:
Код:
a = 4; b = 5/2; c = 2; d = 1;
f[t_] = {x[t], y[t]}/.NDSolve[{x'[t] == (a - b y[t]) x[t], y'[t] == (-c + d x[t]) y[t],  x[0] == 3, y[0] == 1}, {x[t], y[t]}, {t, 0, 10}][[1]]
f[1]
{1.09666, 2.26288}

И программу для математики стоит оформлять в виде кода. Тогда ее сразу можно копировать, вставить в математику и т.п. ТеХ здесь не причем.

 Профиль  
                  
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 2 ] 

Модераторы: Karan, Toucan, PAV, maxal, Супермодераторы



Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group