Preben Alsholm

MaplePrimes Activity


These are replies submitted by Preben Alsholm

A Google search led to

http://www.mapleprimes.com/questions/36748-Maplesofts-Direction-After-Take-Over

and

http://www.walkingrandomly.com/?p=1563

A Google search led to

http://www.mapleprimes.com/questions/36748-Maplesofts-Direction-After-Take-Over

and

http://www.walkingrandomly.com/?p=1563

@Wang Gaoteng

with(plots):
equ := 2+(s+1)*exp(tau*s) = 0;
res0:=solve(equ,s);
complexplot(res0,tau=0..3,thickness=3);
#res0 leaves the real axis at
solve(-2*tau*exp(tau)=-exp(-1),tau);
evalf(%);
animate(complexplot,[res0,tau=0..T,thickness=3],T=0.15..0.16);
#Animating in a different interval to examine the crossing with the imaginary axis:
animate(complexplot,[res0,tau=1.15..T,thickness=3],T=1.15..1.25);
#Numerical solution:
tf:=fsolve(Re(res0)=0,tau=1.125);
eval(res0,tau=tf);
identify(%);
#The exact crossing may be at that value and happens when tau has the value:
solve(res0=I*sqrt(3),tau);
te:=evalc(%);
evalf(te);
#Checking:
eval(res0-I*sqrt(3),tau=te);
simplify(%);
evalf(%);

@Wang Gaoteng

with(plots):
equ := 2+(s+1)*exp(tau*s) = 0;
res0:=solve(equ,s);
complexplot(res0,tau=0..3,thickness=3);
#res0 leaves the real axis at
solve(-2*tau*exp(tau)=-exp(-1),tau);
evalf(%);
animate(complexplot,[res0,tau=0..T,thickness=3],T=0.15..0.16);
#Animating in a different interval to examine the crossing with the imaginary axis:
animate(complexplot,[res0,tau=1.15..T,thickness=3],T=1.15..1.25);
#Numerical solution:
tf:=fsolve(Re(res0)=0,tau=1.125);
eval(res0,tau=tf);
identify(%);
#The exact crossing may be at that value and happens when tau has the value:
solve(res0=I*sqrt(3),tau);
te:=evalc(%);
evalf(te);
#Checking:
eval(res0-I*sqrt(3),tau=te);
simplify(%);
evalf(%);

I use animations quite a lot. The ones in the following link were used on the web site's front page one semester. To be honest, I don't think they were appreciated, but I had fun.

The minimal descriptions in the following are in Danish, but the code is provided.

On the web page in the link you click on "Gamle forsideopgaver og illustrationer".

A few are not animations but were also supposed to be appetizers.

http://alsholm.dk/Kurser/01007/index.php?id=10027

Without looking too closely at what you are doing setoptions3d does seem to me to work.

Why do you have both of 'axes = NONE' and 'axes = NORMAL' in several  commands?

Without dealing with the issue I noticed that you have 'pi'. If the mathematical constant of that name is intended, then it is Pi.

I tried using Firefox and Chrome. No problem after doing what you described.

Standard Worksheet Interface, Maple 14.01, Windows Vista, October 15 2010 Build ID 535952

@tayyab You will find both explained in the help:

?dsolve,numeric,bvp

@tayyab You will find both explained in the help:

?dsolve,numeric,bvp

@Axel Vogt You are right. R should rather be:

R:=map([op],indets(u,algebraic^fraction ));

The procedure was made in Maple 14. If you change identical('all') to identical(all) it works in Maple 12.

The unevaluation quotes in identical('all') are superfluous in Maple 14, but gives an error in Maple 12.

@Axel Vogt You are right. R should rather be:

R:=map([op],indets(u,algebraic^fraction ));

The procedure was made in Maple 14. If you change identical('all') to identical(all) it works in Maple 12.

The unevaluation quotes in identical('all') are superfluous in Maple 14, but gives an error in Maple 12.

Did you want w to appear in the expression equ1 or did you want to solve the equation equ1 = w for different values of w or what?

@jean-jacques One parameter - one window ? What should be going on in the M windows? It is not clear to me at this moment.

Incidentally, if you are not aware of Explore you may want to try that:  ?Explore

@jean-jacques One parameter - one window ? What should be going on in the M windows? It is not clear to me at this moment.

Incidentally, if you are not aware of Explore you may want to try that:  ?Explore

First 213 214 215 216 217 218 219 Last Page 215 of 231