## 160 Reputation

11 years, 229 days

## linestyle in plot...

hai sir, can we get a line style of the plot given in sample in maple plot with legends also like that

## How do i get in plot line style to be of...

Maple 13

Dear sir, can we get a plot of graph with line style like  line+symbol so on..

I am attaching codes and sample graph .

h:=z->1-(delta2/2)*(1 + cos(2*(Pi/L1)*(z - d1 - L1))):
K1:=(4/h(z)^4)-(sin(alpha)/F)-h(z)^2+Nb*h(z)^4:
lambda:=(F,Nb,delta2)->Int(K1,z=0..1):

L1:=0.2:
d1:=0.2:
alpha:=Pi/6:
A:=plot( [seq(seq(lambda(F,Nb,delta2), Nb=[0.1,0.2,0.3]), F=[0.1,0.2,0.5])],
delta2=0.02..0.1, linestyle = [solid,longdash,dashdot],'
thickness = 2',color=[red\$3,blue\$3,black\$3],
legend=["Nb=0.1","Nb=0.2","Nb=0.3",""\$6]):
B:=plots:-textplot([[0.05,-1,F=0.1],[0.05,1.5,F=0.2], [0.05,3,F=0.5]], font=[times, 14]):

plots:-display(A, B);

## How do i get a legend only three curves ...

Maple 13

Dear sir i want to display only three curves 1, curve 2 curve 3  in legends but in the plot it should be nine curve a sampe codes and a sample graph is attaching , please give suggestions. Here is my codes

h:=z->1-(delta2/2)*(1 + cos(2*(Pi/L1)*(z - d1 - L1))):
K1:=(4/h(z)^4)-(sin(alpha)/F)-h(z)^2+Nb*h(z)^4:
lambda:=(F,Nb,delta2)->Int(K1,z=0..1):

L1:=0.2:
d1:=0.2:
alpha:=Pi/6:
A:=plot( [seq(seq(lambda(F,Nb,delta2), Nb=[0.1,0.2,0.3]), F=[0.1,0.2,0.5])], delta2=0.02..0.1, linestyle = [solid,longdash,dashdot],'thickness = 2',color=[red\$3,blue\$3,black\$3]):

B:=plots:-textplot([[0.05,-1,F=0.1],[0.05,1.5,F=0.2], [0.05,3,F=0.5]], font=[times, 14]):

plots:-display(A, B);
sample graphs

## contour plot different v alues...

Maple 13

Hellow sir how to plot stream lines for different values of alpha =6,7,8,9.

I am attaching the sample graph and codes.
How to get the output like that only.

eq1:= alpha*diff(f(eta),eta\$3)+f(eta)*diff(f(eta),eta\$2)-diff(f(eta),eta)^2+1:
eq2:= diff(h(eta),eta\$2)+f(eta)*alpha*diff(h(eta),eta)-diff(f(eta),eta)*h(eta):
eq3:= diff(H(eta),eta) = h(eta):
bc:= f(0)=0, D(f)(0)=0, D(f)(6)=1, h(0)=0, D(h)(6)=1, H(0)=0:
A1:= dsolve(
{eq||(1..3), bc},
numeric, method= bvp[midrich], abserr = 1e-10, output= operator
):

psi:= unapply(eval(x*f(eta)+H(eta), A1), (x,eta)):
plots:-contourplot((psi(x,eta), x= 0..6, eta= 0..6),alpha=6);

## Plot inside one more plot...

Maple 13

Dear sir I want to plot the graph where the lines are coincides maximize the graph in the same graph.  A sample graph i am attaching .some sample codes are here.

h:=z->1-(gamma2/2)*(1 + cos(2*(Pi/omicron1)*(z - d1 - omicron1))):
K1:=((4/h(z)^4)-(sin(Zeta1)/omega)-h(z)^2+Nb*h(z)^4):
kappa:=Int(K1,z=0..1):
omicron1:=0.2: omega:=10:d1:=0.2:Zeta1:=Pi/6:

plot( [seq(eval(kappa, Nb=j), j in [0.01,0.02,0.03])], gamma2=0.02..0.1);

 First 8 9 10 11 12 13 14 Page 10 of 15
﻿