0

私は Mathematica を一般的に使用していないので、他のプログラムと比較するために Mathematica が必要です。3 つの微分方程式と非線形方程式の連立方程式を解きたいと考えています。これには Dsolve を使用します。非線形項 (指数関数) を入れると、すべてがうまくいきません。

これが私のコードです:

equa = {x'[t] == z[t] - Exp[y[t]], 
y'[t] == z[t] - y[t], 
z'[t] == x[t] + y[t] - z[t], 
x[0] == 0, 
y[0] == 0, 
z[0] == 0};
slt = DSolve[equa, {x, y, z}, t]
Plot[{x[t] /. slt}, {t, 0, 10}]

エラーは次のようになります。

DSolve::dsvar: 0.1 は変数として使用できません。

ReplaceAll::reps:{Dsolve[<<1>>]} は置換ルールのリストでも有効なディスパッチ テーブルでもないため、置換には使用できません

指数項が問題を引き起こす理由を誰かが知っていますか?

ありがとう

4

1 に答える 1

2

あなたは試すことができます

s = NDSolve[equa, {x, y, z}, {t, 0, 10}];
Plot[Evaluate[({x[t], y[t], z[t]} /. s)], {t, 0, 1}]

ここに画像の説明を入力

于 2012-03-05T14:38:18.440 に答える