sum not converging...

In the following problem at two example are given. For Z=2 the sum is converging whereas at Z=4 it is not converging. Thank you

PROBLEM.mw

how to get the output of the plots in rows and col...

any one can help me to get the output of the plot in 3 rows and 2 columns here is my codes. thanks in advance.

restart;
h:=z->1-(delta2/2)*(1 + cos(2*(Pi/L1)*(z - d1 - L1))):
K1:=((4/h(z)^4)-(sin(alpha)/Gamma2)-h(z)^2+Nb*h(z)^4):
lambda:=unapply(Int(K1,z=0..1), Gamma2):
L1:=0.2:
d1:=0.2:
alpha:=Pi/6:
with(plots):
display
( Vector[row]
( [ seq
( plot
( [ seq
( eval(lambda(Gamma2), Nb=j),
j in [0.1,0.2,0.3]
)
],
delta2=0.02..0.1,
legend=[Nb=0.1,Nb=0.2,Nb=0.3],
labels=[typeset(`&delta;1`), typeset(conjugate(`&Delta;p`))],
title=typeset("Effect of ", ''alpha'', " when ", Gamma,"2=", Gamma2)
),
Gamma2 in [10,20,30,40,50,-10]
)
]
)
);

how to remove error in plot display...

Hellow ,

any body can help me to remove the error from the plot, here is my codes .

Note. 1. *Title {Effect of alpha when 'Gamma2'=Gamma2}

2. *on the y axis i want  bar(deltap)

restart;

h:=z->1-(delta2/2)*(1 + cos(2*(Pi/L1)*(z - d1 - L1))):
K1:=((4/h(z)^4)-(sin(alpha)/Gamma2)-h(z)^2+Nb*h(z)^4):
lambda:=unapply(Int(K1,z=0..1), Gamma2):
L1:=0.2:
d1:=0.2:
alpha:=Pi/6:
plots:-display(Vector[row]([seq(plot([seq(eval(lambda(Gamma2), Nb=j), j=[0.1,0.2,0.3])], delta2=0.02..0.1, legend=[Nb=0.1,Nb=0.2,Nb=0.3],labels = ["d1 ", "Dp"],labelfont = ["SYMBOL", 12], title=(Effect of alpha when 'Gamma2'=Gamma2)), Gamma2=[10,20,30])]),axes=boxed);

height and width of plot in maple 13...

how to adjust the height and width of plot in maple 13

plot( x[3]^5, caption = typeset("\n A plot of %1.", x[3]^5), captionfont=[times, 20] );

caption size and font in plot...

hellow,

can any body help me to  increase the size of the caption in maple plot

plot( x[3]^5, caption = typeset("A plot of %1.", x[3]^5) );

dslove trigger time with rhs(SOL[1](last)...

I want to fetch the trigger time.
I use rhs function.

 >
 >
 >
 >
 (1)
 >
 (2)
 >

 >
 >
 >
 (1)
 >
 >
 >
 (2)
 >
 >
 (3)
 >
 (4)
 >
 (5)
 >
 >
 (6)
 >
 >
 >
 >
 (7)
 >
 >
 >
 >
 >

extracting coefficients of exponential functions...

Consider for instance the following equation:

Eq:=(a-4)*exp(4*x)+(b+1)*exp(2*x)+(c-2)=0

How can I list the coefficients of the exponential functions and also solve the equation for the constant parameters

a, b, and c?

I tried

[coeffs(collect(lhs(EQ), exp), exp)] =~ 0;

but it did not work. Thank you for your help.

fetch the dsolve event time ...

1) How can i get the event time. This example 0.69313.

2) I don't want to see the Warning.How can i do it?

`Warning, cannot evaluate the solution further right of .69314729, event #1 triggered a halt`

dsolve with event...

Why this event dose'nt work ?
S(t) is a state , a parameter
dsolve(...,numeric,events = [[[s(t), a*arcsinh(2/a) < s(t)], halt]]);

Having problems with expansion series (mtaylor)...

Good evening!!!

Let me briefly describe the problem I've faced recently.

The program (attached) deals with a rather complicated function f depending on parametrs eps1, eps2, eps3, eps4 and variable w. The aim is to expand the function f(w1) into Taylor series with respect to all parametrs (eps1, eps2, eps3, eps4) in order to study its asymptotic behavior as function depending only on k; 0<k<1.

I decided to use mtaylor-function for that problem, which (as I've understood) is the only one to be applied in such cases, but the result was rather unsatisfactory, an error:

Error, (in gcd/LinZip) input must be polynomials over the integers

Programm code: (1)-(12) only announcing functions....(((, see below

 >
 (1)
 >
 (2)
 >
 (3)
 >
 (4)
 >
 (5)
 >
 (6)
 >
 (7)
 >
 (8)
 >
 (9)
 >
 (10)
 >
 (11)
 >
 (12)
 >
 >
 >

Wish you could give some advice on how to improve the situation.

Hold Maple Script...

How can I run Maple Script ,hold it and continue to run it ?
Somethink like Matlab pause statment

Tank you

protected variable...

I have this maple code:
I want to change

back to α. How can i do it ? (it don't work with unprotect)

Stop the simulation according to event...

I do the numerical simulation with

lp:=dsolve(....,type = numeric, range = ta .. te)

The simulation stop at t=te .

I want to stop the simulation when e.g. x(t) < 0

How can i do it ?

Error with display and legend...

I use
lp1=dsolve(...,numeric)
p1 := odeplot(lp1,....)

new parameter

lp2=dsolve(...,numeric)
p2 := odeplot(lp2,....)

display([p1, p2], legend = ["step", "impulse"])

anf get the error

Error, (in plots:-display) display does not accept the legend option

 5 6 7 8 9 10 11 Last Page 7 of 54
﻿