thankyou for your help, i appreaciate it
-Scott

thankyou for your help, i appreaciate it
-Scott

The problem is that the plot3d portraiys more of a 'straight-line peak' across one fo the domians. It is suppose to look like the point plot where it is a rounded peak. (i.e. each plot is suppose to be the same 'general' shape, but they differ drastically)

The problem is that the plot3d portraiys more of a 'straight-line peak' across one fo the domians. It is suppose to look like the point plot where it is a rounded peak. (i.e. each plot is suppose to be the same 'general' shape, but they differ drastically)

Continued Plotting issues
i was wondering if anyone could help me with the either errors i have made or an ideas on how i could go about resolving the differences in the 'plot' of the mathieuCE function. I have 2 plots listed below, the pointplot is what the plot3d is suppose to look like, yet they differ. Is it just the accuracy of the 3d plotter that is the issue?
with(plots):Digits:=15:
> Omega[0,1]:=.825352549049169:
plot3d(MathieuCE(0,Omega[0,1],r*I)*MathieuCE(0,Omega[0,1],theta),theta=0..2*Pi,r=0..1,coords=ellcylindrical,axes=FRAMED);
points1:={seq(seq([T/100,2*Pi*S/100,MathieuCE(0,Omega[0,1],2*Pi*S/100)*MathieuCE(0,Omega[0,1],I*T/100)],T=1..100), S=1..100)}:
pointplot3d(points1,coords=ellcylindrical, axes=FRAMED, color=red, style=wireframe);

Continued Plotting issues
i was wondering if anyone could help me with the either errors i have made or an ideas on how i could go about resolving the differences in the 'plot' of the mathieuCE function. I have 2 plots listed below, the pointplot is what the plot3d is suppose to look like, yet they differ. Is it just the accuracy of the 3d plotter that is the issue?
with(plots):Digits:=15:
> Omega[0,1]:=.825352549049169:
plot3d(MathieuCE(0,Omega[0,1],r*I)*MathieuCE(0,Omega[0,1],theta),theta=0..2*Pi,r=0..1,coords=ellcylindrical,axes=FRAMED);
points1:={seq(seq([T/100,2*Pi*S/100,MathieuCE(0,Omega[0,1],2*Pi*S/100)*MathieuCE(0,Omega[0,1],I*T/100)],T=1..100), S=1..100)}:
pointplot3d(points1,coords=ellcylindrical, axes=FRAMED, color=red, style=wireframe);

> fsolve(MathieuCE(0,q,I)=0,q,0..1);assign(Omega[0,1]=%):
> Ze[0,1]:=MathieuCE(0,Omega[0,1],r*I)*MathieuCE(0,Omega[0,1],theta);
> plot3d(Ze[0,1],theta=0..2*Pi,r=0..1,coords=ellcylindrical);
Plotting error, MESH must be a list of lists of vertices, or an hfarray

> fsolve(MathieuCE(0,q,I)=0,q,0..1);assign(Omega[0,1]=%):
> Ze[0,1]:=MathieuCE(0,Omega[0,1],r*I)*MathieuCE(0,Omega[0,1],theta);
> plot3d(Ze[0,1],theta=0..2*Pi,r=0..1,coords=ellcylindrical);
Plotting error, MESH must be a list of lists of vertices, or an hfarray