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, Супермодераторы



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

Сейчас этот форум просматривают: DariaRychenkova


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

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