Apprendre Maple

michel · Inscrit le: 23 Juin 2006 Messages: 72

Bonjour,
J'ai un problème avec une substitution : with(linalg):
> AN := {R=10, C=10^(-7), omega=100*Pi, dx=10^(-2)};

> M:=matrix([[1,-R*dx],[- I*omega*C/dx,1+I*R*C*omega]]); > Man := evalm(subs(AN,M));
Comment faire pour que cette instruction soit efficace ? Merci.

ALS · Inscrit le: 11 Sep 2006 Messages: 647

Bonjour, il suffit d'utiliser une simplification de M selon la donnée AN:

michel · Inscrit le: 23 Juin 2006 Messages: 72

Bonjour, encore une question !
Je voudrais éléver cette matrice Man puissance 100 soit faire Man^100; instruction qui ne donne rien. Y-a-t-il une solution ? Merci.

ALS · Inscrit le: 11 Sep 2006 Messages: 647

Bonjour,
Effectivement l'ordre
> evalm(Man^100);
donne une matrice trop compliquée mais on peut avoir une forme plus simple après évaluation numérique:

> map(evalf,evalm(Man^100));

[0.5993455959 + 1.513416744 I , -9.180618914 - 5.174106082 I]

[0.1625493367 - 0.2884176496 I , 0.5830906620 + 1.542258509 I

]