Aslam-u-Alikum... How are you. Hope you will be fine. I want to solve nonlinear Equation for the root 0, 4.4934, 7.7253,10.9041,14.0662,17.2208, but my code give the solutions in Rootof form. Please help me as early as possible...Help.mw

Aslam-ul-Alikum I need some help urgently. I want to compare the coefficients of like powers of Y_1*Y_2, please help how i compare it in mapleHelp.mw

Aslam-ul-Alikum I need some help urgently. I want to compare the coefficients of like powers of Y_1*Y_2, please help how i compare it in maple

Hi, I got a doubtI don’tknow how to make the Runge-Kutta’s and Euler’s method. The Runge-Kutta for thesecond and fourth order. I don’t know how to beginning the algoritms, I needsome help. Thanks.

Dear sir i  want the contour values  automatically display on the contour.

Hear is the code and sample contour plot. 

contourplot(x^5-y^3,x=-5..5,y=-4..3,axes=boxed,contours=10);

Dear sir, 

 i want to plot labelled contour plot in maple 13, 

here is the code

labelledcontourplot(x^3-y^2,x=-3..3,y=-3..2,axes=boxed);

thanks 

I couldn't find a command for this. Is it possible that does not exist for this every day problem?

Dear sir,

 I am unable to evaluate the mean pressure drop graph for different values of k , i will be thankful to you if any one solve my problem

here is my codes and mean pressure drop equation

restart:

with(DETools):

with(IntegrationTools):

eta:=1+k*x+epsilon*sin(2*Pi*x):

epsilon:=0.1:

R:=1.0:

A:=0.0628:

delta:=0.1:

k1:=k*delta:

alpha:=1.0:

A1:=(-exp(-alpha*x))/(2*eta^3):

A11:=diff(A1,x):

A2:=(3*exp(-alpha*x))/(2*eta):

A22:=diff(A2,x):

A3:=12*R*A1*diff(A1,x):

A4:=6*R*(A2*A11-A1*A22):

A5:=(1/2)*((k1+A*cos(2*Pi*x)))*((diff(A1,x)*eta+diff(A2,x)*(1/eta)))-(A3*eta^4/280)-(A4*eta^2/60):

A6:=(A3*eta^6/420)+(A4*eta^4/120)-(1/2)*((k1+A*cos(2*Pi*x)))*((diff(A1,x)*eta^3)+diff(A2,x)*eta):

psi0:= A1*y^3+A2*y:

psi1:= A3*y^7/840+A4*y^5/120+A5*y^3+A6*y:

psi:=psi0+delta*psi1:

V:=-diff(psi,x):

U:=diff(psi,y):

Ux:=diff(U,x):

Uy:=diff(U,y):

U2y:=diff(Uy,y):

g1:=delta*Ux:

g2:=int(U2y,x):

g22:=(1/delta)*g2:

g3:=U*Ux:

g33:=int(g3,x):

g4:=V*Uy:

g44:=int(g4,x):

P:=g1+g22-R*(g33+g44):

P1:=(1/eta)*int(P,y=0..eta):

Po:=subs(x=0,P1):

d1:=(Po-P1):

a0:=subs(k=0.0,d1):

a1:=subs(k=0.1,d1):

a2:=subs(k=0.5,d1):

plot([a0,a1, a2], x=0..1, title = "Mean Pressure Drop, alpha=1.0", legend = [k = 0, k= 0.1,k= 0.5], titlefont = ["ROMAN", 15], labels = ["x ", "Pd"], labeldirections = ["horizontal", "vertical"], labelfont = ["HELVETICA", 10], style = [POINT],symbol = [BOX,CROSS,CIRCLE],color = [black, black,black], axesfont = ["HELVETICA", "ROMAN", 8], legendstyle = [font = ["HELVETICA", 9], location = bottom],axes=boxed);

Eigenvectors(A, C) can be used to solve the eigenvalue problem:
A . x = lambda . C . x

if a new term " lambda^2 . D . x " is added to the right hand side, where D is a new matrix, is there a simple way to solve the new eigenvalue problem:

A . x = lambda . C . x + lambda^2 . D . x

Thank you!

Simple Maple procedure definition is like this:

f := proc (x, y) sin(x+y)-exp(x)*y end proc:

How can I use indexed parameter declarations, say:

f := proc (x[1], y[2]) sin(x[1]+y[2])-exp(x[1])*y[2] end proc:

where x and y are arrays of unknowns. It seems that this does not work in Maple 13.

Originally, I want to solve a set of n nonlinear equations with n unknowns W[n] using fsolve(), and the output is a set of equations, say:

hello, i'm using maple, in order to draw a graphic in wich, different functions are plotted, 
these functions came from one with 4 variables, wich represents losses in a phenomenon (extraction) depending on diffenrent variables, so my objective is to varry only one parameter and then draw its curve, and this for each parameter ; i had 4 functions.

with(plots):

f1:=plot((n-1)/(-1+n*10^(6.77*((n-1)/n))), n=1.0537..1.2688):

f2:=plot(0.2365/(-1+1.2365*10^(0.0155*O)), O=76.42..99.92):...

I want to print     a_n   is  in  S .

Here are what I tried.

How to copy maple output equation in word such that in word 2003  we can edit the equation

A1:=(-exp(-alpha*x))/(2*eta^3);

thanks 

I want to plot a graph of different values of k=0.1,k=0.5, k=-0.1, the display should be like this

my codes are 

restart:

V := exp(-x)*y^3/eta^3:

eta:=1+k*x+sin(2*Pi*x):

x:=0.1:

k:=0.1:

p2:=plot(V, y = 0 ..eta):

tf:=plottools:-transform((x,y)->[y,x]):

tf(p2):

plots:-display(tf(p2),labels=["v","y"]);