## 160 Reputation

11 years, 238 days

## multiple plot with different values...

Maple 13

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"]);

## finite element shape function...

Maple 13

Hellow,

any one know how to solve the second order differential equation using finite element method (Using Linear shape functions)

## plot horizontal and vertical axis inter...

Maple 13

Dear sir,

i want to change the horizontal and vertical axis in maple plot. on horizontal axis  i  want velocity  u(y) values and on vertical axis y values i am attaching the file also My codes are

U:=(y^2-2*h*y)*(-(5/2)*c1/(2*h^2*a^2+5));

c1:=1:

h:=1:

a0:=subs(a=1,U):

a1:=subs(a=1.5,U):

a2:=subs(a=2.5,U):

a3:=subs(a=3.5,U):

a4:=subs(a=4.5,U):

a5:=subs(a=5,U):

plot([a0,a1, a2,a3,a4,a5], y=0..1, title = " Velocity profile for c1=1 and h=1", legend = [alpha = 1, alpha= 1.5,alpha= 2.5,alpha= 2.5,alpha= 4.5,alpha= 5], titlefont = ["ROMAN", 15], labels = ["y ", "u(y)"], labeldirections = ["horizontal", "vertical"], labelfont = ["HELVETICA", 10], style = [POINT],symbol = [BOX,CROSS,CIRCLE,DIAGONALCROSS,DIAMOND,SOLIDBOX],color = [black, black,black,black,black,black], axesfont = ["HELVETICA", "ROMAN", 8], legendstyle = [font = ["HELVETICA", 9], location = bottom],axes=boxed);

## extract data x and y values contour plot...

Maple 13

I want to evaluate the values of x and y and the data should bo saved in .xls format  from contour plot

for g=0.1 the data x and y values  should be stored in xls sheet 1  atleast 50 values

similarly  in separate xls sheet

for g=0.0 the data x and y values  should be stored in xls sheet 1  atleast 50 values

```with(plots):
g:=y*(1-1/(x^2+y^2)):
colors:=table([0.1=blue,0.0=green,0.2=red]):
display(seq(contourplot(g,x=-1..1,y=0..2,
contours=[i],color=colors[i],axes=boxed,legend=(i)),i=[0.1,0.0,0.2]));```

## color, legends in implicit plot ...

Maple 13

How to give the different colors in implicit plot  and add legends my codes are

with(plots):

`g:=y*(1-1/(x^2+y^2)):`
`aa:=[g=0.1,g=0,g=0.5]:`
`implicitplot({seq(aa[i],i=1..3)},x=-5..5,y=0..2,legend="g=0.1,g=0,g=0.5",color=[red,blue,green],scaling=constrained);`
 First 12 13 14 15 Page 14 of 15
﻿