|
Apprendre Maple Site dédié au logiciel de calcul formel Maple
|
Voir le sujet précédent :: Voir le sujet suivant |
Auteur |
Message |
jaybe
Inscrit le: 14 Nov 2007 Messages: 1
|
Posté le: 14 Nov 2007 14:44 Sujet du message: Question toute simple |
|
|
Bonjour, je connais presque pas maple, mais j'en ai besoin pour un TP.
Donc j'ai une fonction gamma, fonction de x,y et alpha. J'aimerais donner des valeurs à x et à y (x=0, y=0,048) et ne garder que alpha comme variable pour tracer ensuite une courbe. Seulement je ne sais pas comment dire à Maple de remplacer x et y par leurs valeurs respectives. Qq peut me donner la syntaxe ?
D'avance merci !
JB
Voila, mes fonctions, Phi, que je dérive par rapport à y pour obtenir gamma.
> phi:=((32*8.19736e10*0.048^2*alpha)/Pi^3)*sum((1/(2*n-1)^3)*((-1)^(n-1))*(1-cosh(((2*n-1)*Pi*y)/(2*0.048))/cosh(((2*n-1)*Pi)/2))*cos(((2*n-1)*Pi*x)/(2*0.048)),n=1..3);
1 / 9
phi := --- \6.043749581 10 alpha ((1. - 0.3985368153 cosh(32.72492349 y)) cos(32.72492349 x
3
Pi
)
- 0.03703703704 (1. - 0.01796513226 cosh(98.17477047 y)) cos(98.17477047 x)
+ 0.008000000000 (1. - 0.0007764062899 cosh(163.6246174 y)) cos(163.6246174 x
\
))/
> gammaxz:=(1/8.19736e10)*diff(phi,y);
1
gammaxz := --- (0.07372800000 alpha (
3
Pi
-13.04208679 sinh(32.72492349 y) cos(32.72492349 x)
+ 0.06532306430 sinh(98.17477047 y) cos(98.17477047 x)
- 0.001016313457 sinh(163.6246174 y) cos(163.6246174 x))) |
|
Revenir en haut de page |
|
|
zozo
Inscrit le: 03 Jan 2013 Messages: 125
|
Posté le: 15 Nov 2007 9:08 Sujet du message: |
|
|
Salut, je remplace x et y par leurs valeurs dans gammaxz en utilisant subs puis je construis une fonction g de la variable alpha avec unapply.
Ensuite je fais un plot pour dessiner la courbe de g fonction de alpha (ici sur -10..10)
A+
Code: |
> phi:=((32*8.19736e10*0.048^2*alpha)/Pi^3)*sum((1/(2*n-1)^3)*((-1)^(n-1))*(1-cosh(((2*n-1)*Pi*y)/(2*0.048))/cosh(((2*n-1)*Pi)/2))*cos(((2*n-1)*Pi*x)/(2*0.048)),n=1..3);
> gammaxz:=(1/8.19736e10)*diff(phi,y);
>
10
phi := 0.6043749581 10 alpha (
(1. - 0.3985368153 cosh(32.72492349 y)) cos(32.72492349 x) -
0.03703703704 (1. - 0.01796513226 cosh(98.17477047 y))
cos(98.17477047 x) + 0.008000000000
(1. - 0.0007764062899 cosh(163.6246174 y)) cos(163.6246174 x)
/ 3
) / Pi
/
gammaxz := 0.07372800000 alpha (
-13.04208679 sinh(32.72492349 y) cos(32.72492349 x)
+ 0.06532306430 sinh(98.17477047 y) cos(98.17477047 x)
3
- 0.001016313457 sinh(163.6246174 y) cos(163.6246174 x))/Pi
> g:=unapply(subs(x=0, y=0.048,gammaxz),alpha);
g := alpha -> 0.07372800000 alpha (
-13.04208679 sinh(1.570796328) cos(0.)
+ 0.06532306430 sinh(4.712388983) cos(0.)
3
- 0.001016313457 sinh(7.853981635) cos(0.))/Pi
> plot(g(alpha),alpha=-10..10);
|
|
|
Revenir en haut de page |
|
|
|
|
Vous ne pouvez pas poster de nouveaux sujets dans ce forum Vous ne pouvez pas répondre aux sujets dans ce forum Vous ne pouvez pas éditer vos messages dans ce forum Vous ne pouvez pas supprimer vos messages dans ce forum Vous ne pouvez pas voter dans les sondages de ce forum
|
Développé par phpBB © 2001, 2006 phpBB Group
Traduction par : phpBB-fr.com
Apprendre Maple - ©
- Alain Le Stang - Navigation optimisée pour une résolution 1024 x 768.
|