Advanced Search

Jayaprakash J

20 Reputation

4 Badges

3 years, 280 days
Contact Jayaprakash J

MaplePrimes Activity


These are questions asked by Jayaprakash J

How to create n-th differentiation is an...

Jayaprakash J 20 Maple
differentiation diff
September 13 2019
2 3

I have a dependent and independent variables u(x),v(x),w(x),....diff( u(x),x$n)=U(k),diff( v(x),x$n)=V(k)......

Is it possible to create, diff(     , x$n)  is an operator or any differentiable function?

How to convert a file from mathematica n...

Jayaprakash J 20 Maple 17
mathematica import duplicate-question
September 10 2019
3 4

tittle.6.mw 
 

> 

"Manipulate[Module[{sol,p1,p2,sys,tbleq,eq,init,sol1,solDTM,xDTM}, Np=10;H=1; sol=NDSolve[{alpha D[u[x,t],{x,2}]== D[u[x,t],{t,1}],u[-1,t]== 1,u[1,t]== 1,u[x,0]== Exp[-1000 (x+1)^2 (1-x)^2]},u[x,t],{x,-1,1},{t,0,1}]; p1=Plot[u[x,t]/.sol/.t-> ta,{x,-1,1},Frame-> True,PlotStyle->{Red,Thick},GridLines->Automatic,PlotRange->{0,1}]; eq[k_]:=alpha (k+2) (k+1) F[k+2][t]- F[k]'[t]==0; tbleq=Table[eq[i],{i,0,Np}]; init=Table[F[k][0]== If[k==0,0,0],{k,0,Np}]; sol1=Solve[{Sum[(1/H)^k F[k][t],{k,0,Np+2}]==1,Sum[(-1/H)^k F[k][t],{k,0,Np+2}]==1},{F[Np+1][t],F[Np+2][t]}]; sys=Join[tbleq/.sol1,init]//Flatten; solDTM=NDSolve[sys//Flatten,Table[F[k],{k,0,Np}],{t,0,0.5}]; xDTM[x_]:= Sum[((x/H)^k) F[k][t]/.sol1/.solDTM,{k,0,Np+2}]; p2=Plot[xDTM[x]/.t-> ta,{x,-1,1},Frame->True,GridLines->Automatic,PlotStyle->{Dashed,Thick,Blue},PlotRange->{0,1}]; Show[p1,p2,ImageSize->{580,400}]],{{alpha,1,"thermal diffusivity"},0.1,2,0.1,Appearance-> "Labeled"},{{ta,0.075,"time"},0.01,0.1,0.005,Appearance-> "Labeled"}] "


 

Download tittle.6.mw

How to apply differential transformation...

Jayaprakash J 20 Maple
homework differential-equations duplicate-question
September 03 2019
2 3

How can I apply differential transformation method in differential equations with maple commands .DE is y'''(x)+xy''(x)-y(x)=0;

1 2 3 Page 3 of 3