Hi everyone,

I have a question about surface fitting. I tried to follow the step of application "Fitting an Ellipse to Data" to fit the ellipsoid surface but got the incorrect result:

It seems that the convergence condition can be modified but I have no idea. 

The related Maple file is attached:

Ellipsoid_Surface_Fitting.mw

I'd appreciate any help on this topic. Thank a lot.

Hi,   I want to substitute every  U[jj+1,-1] by U[jj+1,1] in these lines. Many thanks to send your remarks.
U[jj+1,-1]:=U[jj+1,1];

for jj from 1 to M do:
  sys[jj] := eval(BTCS_general,j=jj);
od;

subs(U[jj,M+2]=U[jj,M]; U[jj+1,-1]=U[jj+1,1], sys);

  Why in this equation U[jj+1,-1] doesnt changed by U[jj+1,1];
                    s u[i + 1, -1]   4 s u[i + 1, 0]   6 s u[i + 1, 1]
      u[i + 1, 1] + -------------- - --------------- + ---------------
                           4                4                 4       
                          h                h                 h        

           4 s u[i + 1, 2]   s u[i + 1, 3]          
         - --------------- + ------------- = u[i, 1]
                  4                4                
                 h                h                 

What is the set of the points (x,y) s. t.

y^2+y^3+(y^3-x^2-3*x*y)^(1/4) <= 5*x*y ?

How to draw it with Maple?

Hello those who attends Mapleprimes,

I have a question.

A programme was written in a text:

n:=5

if n=0 then

0

elif n=1 then

 1/2

elif n=2 then

  sqrt(2)/2

elif n=3 then

  sqrt(3)/2

else error "bad argument: \%1", n;

end if; 

The answer of this programme was 

 error bad argument.

What I couldn't understand was the meaning of \%1

Could you tell me about it to me?

Thanks in advance.

taro

Dear people in mapleprimes,

I have a question which is probably very elementary.

> integers:=[10..15]:
> select(isprime, integers);
Then, "Error, selecting function must return true or false" appears.

On the other hand, 

> integers:=[$10..15]:
> select(isprime, integers);

Then , [11, 13] appears.

What role does the character "$" play here? 

 Thank you in advance.

taro

Using the Fourier convolution theorem to solve f(t) =sin (t)

f(t)=R dJ(t)/dt+J(t)/C

R dJ(t)/dt+J(t)/C=f(t)

where f(t) is a driving electromotive force. Use the fourier transform to analyze this equation as follows.

Find the transfer function G(alpha)  then find g(t) .

 Thanks ....

Hi ;

I need your help to write the system contains all these equation:



# system 1
u[0,0]:=(1/2)*(u[1,0]+u[0,1]);
u[0,N+1]:=(1/2)*(u[0,N]+u[1,N+1]);
u[N+1,N+1]:=(1/2)*(u[N+1,N]+u[N,N+1]);
u[N+1,0]:=(1/2)*(u[N,0]+u[N+1,1]);
# system 2
for j from 1 to N do
u[0, j] := (1/4)*(u[1,j]+u[1,j]+u[0, j-1]+u[0,j+1]-f[0,j]*h^2);
end do;
# System 3
for j from 1 to N do
u[N+1, j] := (1/4)*(u[N, j]+u[N-1,j]+u[N+1, j-1]+u[N+1, j+1]-f[N+1,j]*h^2);
end do;
system4
 eqs := [ seq(seq(Stencil[1](h,i,j,u,f),i=1..N),j=1..N)];

How can collect these system 1 system2, system3 ans system4 in a set with one name.


sys:=[eqs,system3,system2,system2]; ( sys: here contains all the equation).

Thanks you.

Hi,

When I run two times my code, the results change.

Have you any idea, why???

Hi:

i will calculation of value function in every step by 0.001(x=0,x=0.001,x=0.002,...x=10):

my function:

f(x)=x^3+2*x+1

my domain:

0<x<10

Hi , everyone who love Maple and dsolve command, 

my ODE is :

sys_ode := diff(d11(m), m) = -(3*sin(m)^2-1)*d31(m)/a^(3/2)+(-3*cos(m)*sin(m)/a^(3/2))*d41(m), diff(d21(m), m) = (-3*cos(m)*sin(m)/a^(3/2))*d31(m)-(3*cos(m)^2-1)*d41(m)/a^(3/2), diff(d31(m), m) = -a^(3/2)*d11(m), diff(d41(m), m) = -a^(3/2)*d21(m)

using " dsolve([sys_ode]) " command could get the solution easily, and the solution contains "I" (imaginary domain).

However, when we substitute the solution into the ODE "sys_ode", find not correct !

we use the following command to check the solution :

 simplify(  -diff(d11(m), m) -(3*sin(m)^2-1)*d31(m)/a^(3/2)+(-3*cos(m)*sin(m)/a^(3/2))*d41(m)  )

the upper expression is supposed to be zero, but not ! Is it a bug in Maple dsolve ?

Hi:

how can i convert one nonlinear second order ode to first order in maple?

How can I plot multiple numeric plots, such that numeric solutions belong to different differential equations?

For solving problem sets, I have a pdf template I created for myself that has a header with a blank for the class name, TA, professor, date, etc. In addition to this header, I had a margin on the left to scribble questions I had and to holepunch. 

I used to print out the template and write on the template and turn in that as my pset.

I am nowthinking of doing everything on the computer. Writing out all of the problem set on the computer. Combining stuff from maple, combining handwritten stuff from the computer using a digitizer. However I want to write it all on top of the my template that I created, which is a pdf file. I can turn the pdf into an image file if need be. 

What would be the easiest way to do what I want? To open a program that automatically sets that pdf as the template and easily lets me handwrite stuff I want and paste in maple code? 

Right now if I tried my idea, I would basically be constantly copying and pasting stuff from maple and my digitizer drawn pictures/equations into one file and it would be very clumsy.

Basically there are problems that I do partially on maple and I just want to unify all my work into one easy, printable file. 

I'm doing a pset in maple.

I paste in a block of text in maple. I put an asterik at front and end, and hit enter and it spits out an error. Why? I thought two *'s around it comment it out. 

I also can't see the file I uploaded while I preview my post.