maxima - wxMaxima の Mathematica の ListLinePlot

Question

私は次の機能を持っています：

P[t_] := P[t] = P[t-1] +a*ED[t-1];
ED[t_] := ED[t] = DF[t] + DC[t];
DF[t_] := DF[t] = b (F - P[t]);
DC[t_] := DC[t] = c (P[t] - F);

そして、次のパラメータ:

a=1;
c=0.2;
b = 0.75;
F=100;

Mathematica では、関数「ListLinePlot」を使用して P[t] と F をプロットします。

ListLinePlot[{Table[P[t], {t, 0, 25}], Table[F, {t, 0, 25}]}, PlotStyle → {Black, Red},Frame → True, FrameLabel → {"time", "price"}, AspectRatio → 0.4, PlotRange → All]

wxMaximaでこれを行うにはどうすればよいですか? ListLinePlot に類似した機能または代替機能はありますか?

これはwxMaximaでの私の試みです:

P[t] := P[t-1] + a * ED[t-1];
ED[t] := DF[t] + DC[t];
DF[t] := b*[F-P[t]];
DC[t] := c*[P[t]-F];

a=1;
c=0.2;
b=0.75;
F=100;

そして、私は試しました：

draw2d(points(P[t], [t,0,25]))

プロットされた関数は次のようになります。