Dear friends,

My following commands (MAPLE 14), generate the matrix zz1 (see below).

How could I get a plot with "n" (first column) in the "X-coordinate" and second/third and fouth columns in "Y-coordinate"?,

Thanks for your attention,

Jean-Jacques

restart:
interface(rtablesize=50):
f1 :=  (w1, w2,n) -> add(add(
 `if` (1/2 <= w1+j*w2+((1/n)*(1-w1-w2))*k and

why the results of two BessLk function is wrong? The results I got is negative,but it shouldn't be less than zero。For the same  integration expression, I use the mathematica, can get the right results.But when use maple,with the variable value's increasing,the results ranges from positive to negative.In fact, the result I got is outage probability,it should be positive.

What can be said about this divergent series:

 sum((cos(m)+I*sin(m))*(cosh(w)+sinh(w)),n=1 ..infinity) where m=Pi*n and w = ln(n)/n?

Calculate

int(cos(100*(x^4-x)), x = -infinity .. infinity)

with the relative error less than  10 percentages.

Hello,

I use 'SystemConnect' command to connect two transfer function, as the following codes illustrated.

with(DynamicSystems);
sys1 := TransferFunction(10/(s*(s+10)));
sys2 := TransferFunction(k*s^2/(s+20));
Warning, improper transfer-function, degree(num) > degree(den)
sys3 := SystemConnect(sys1, sys2, connection = negativefeedback, outputtype = tf);
Error, (in unknown) cannot convert improper transfer function to state-space model

Dear all,

does anybody have experience with solving heat conduction for multi-layer domain?

the following command gives unrealistic results:

pdsolve(PDE,IBC, numerics)

Thanks,

Mo

I'm currently implementing the Poker test to determine whether a binary sequence possesses some specific characteristics that a truly random sequence would be likely to exhibit.

Maple can't solve the inequation `assuming`([solve(floor(160/m)>=5*2^m,[m])],[m::posint]);

However, `assuming`([solve((160/m)>=5*2^m,[m])],[m::posint]); works.

Is there a way to rewrite...

Hi friends,

I have this piecewise function:

restart:assume(n,integer):h := piecewise(n::odd, n^2, n^3);

I can not get explicitly the derivative:

diff(h,n);

But, with

restart:h1 := piecewise(And(n::integer, n::odd), n^2, n^3);

I can get the derivative explicitly:

diff(h1,n);

Why ?

Thanks in advance

k := 1:
alpha := vector([x*cos(theta), x*sin(theta), k*x]);

e1 := map(diff, alpha, theta);
e2 := map(diff, alpha, x);

G := matrix([[simplify(e1[1]^2 + e1[2]^2 + e1[3]^2), 0],[0, simplify(e2[1]^2 + e2[2]^2 + e2[3]^2)]]);

inv_e1 := evalm(1/G[1,1]*e1);
inv_e2 := evalm(1/G[2,2]*e2);

e11 := map(diff, e1, theta);
e12 := map(diff, e1, x);
e22 := map(diff, e2, x);

gamma_1_11 := simplify(evalm(e11&*inv_e1));
gamma_1_12 := simplify(evalm(e12&*inv_e1));

How to interpolate in terms of any form of algebra in maple?

For example, to interpolate a time series in terms of exponential or mixed with cos and sin?

Hi, all,

Is there a command to test whether two polynomials are equal to each other?

Or I have to write a procedure to do that?

Thanks.

Gepo

I guess I have an easy question here. How do you write stuff in Maple which you don't want displayed? For example, if I wanted to set alpha=1 but I didn't want that printed after pressing enter?

Cheers

Hi all forum people, I need use the maple for symbolic solutions, I am a beginner user.

I read about the isolate, solve, equations, expressions and functions in maple, I have a great confusion in my head.

My needs are, make a equations (with currents and voltages) and isolate any variable in a time, and combine them with another equations.

  ic=vin/L*Ton+im

if=(vin-vo)/L*Toff+im

dil/dt=(if-im)/T

another case:

Hello friends,

I am using MAPLE 14. I have the following problems. I would like to plot the sequence of points "ww", and the constant funcion  (ordenate) 1/3.  The plot of my commands is ok in terms of the "spirit" of the output, but I would like

1. That in the abscisa appears values larger than 10..say  50.

2. The (horizontal)  line of the constant funcion 1/3 = function of (n)  is thinner (in the current output, this line is too thick).

I tried the following (simplified) for loop

q[1,0]:=x->x^2;
for i from 1 to 2 do
q[1,i]:= 2* diff(q[1,i-1](x),x);
od;

something seems to be wrong when trying to assing the new functions:

q[1,1](x);

just gives "Error, (in q[1, 2]) too many levels of recursion"

What am i doing wrong here?