Простой вопрос по Математика

zuzaka


- все работает так, как я ожидал
Теперь хочу вместо
Plot[Evaluate[-F[c[x] /. %%%] + F[c0/2]], {x, -10, 10}];
писать что-нибудь навроде
Plot[Evaluate[W[x]], {x, -10, 10}];
а W[x] заранее определить как -F[c[x] /. %%%] + F[c0/2]
Однако запись
W = Function[x, -F[c[x] /. %%%] + F[c0/2]]
вне зависимости от количества % не дает функцию. То есть при вызове W[1] мне выдается какое-то выражение Mathematica, а не число, как я хотел. И график, соотв-но, тоже не строится.
Что делать?

slsf

Первое:
solution= NDSolve....
далее везде в коде используешь конструкцию c[x]/.solution
Теперь касаемо функции W[x], ее надо определить так:
W[x_]:=YourFunction[c[x]/.solution]
Проверяй, если что пиши.

zuzaka

спасибо вроде, все работает
Оставить комментарий
Имя или ник:
Комментарий: