Recursão de 1a e 2a Ordem

> X[n+1]:=mu*X[n]*(1-X[n]);

[Maple Math]

> X[n+2]:=mu*X[n+1]*(1-X[n+1]);

[Maple Math]

Soluções para X final 1a Ordem

> X[n]=X[n+1];

[Maple Math]

> X[final]=solve(X[n]=X[n+1],X[n]);

[Maple Math]

> plot3d(X[n+1],X[n]=0..1,mu=0..4);

[Maple Plot]

Mapa de retorno em função de Mu
Os eixos representam Xn (eixo X de 0 a 1), mu (eixo Y de 0 a 4) e Xn+1 (eixo Z, de 0 a 1)

Soluções para X final 2a Ordem

> X[n+2]=X[n];

[Maple Math]

> s:=solve(X[n+2]=X[n],X[n]);

[Maple Math]

> X[final]=s[1];

[Maple Math]

> X[final]=s[2];

[Maple Math]

> X[final]=simplify(s[3]);

[Maple Math]

> X[final]=simplify(s[4]);

[Maple Math]

> plot3d(X[n+2],X[n]=0..1,mu=0..4);

[Maple Plot]
Mapa de retorno em função de Mu
Os eixos representam Xn, mu (Y, 0 a 4) e Xn+2 (Z)

Rogério Neves - LSI

<< Indice >> Entropia Informacional e Expoente de Liapunov