Hi GWANWOO

Try this code

# begin Maple code

xData := [1, 2, 3, 4, 5];
yData := [3, 1, 4, 5, 6];
plot(xData, yData);

# end Maple code

Regards

Matt

Hi jbuddenh

Hopefully this Maple code is helpful for your situation.

#begin maple code

# '''''
restart
mymult:=proc(a,b)
description "this procedure performs unique multiplication"
local C;
C:= A*B + 1;
return C;
end proc;

mymult(3,4);

# end maple code

Regards

Matt

Thank you for your good answer Well.  I would like to add that there can be no real solutions less than one due to the term sqrt(1-x^2). 

Hi Silaws,

you could simplify your expression.

Let x= (n-1)/2

then f = x/(1+x)^2

expand the bottom; f = x/(x^2 + 2x + 1)

since this is an infinity over infinity you can 

Apply L'Hospitals rule f_new  = 1/(2x+2)

now limit x-> infinity of f_new is 0

so f converges.

http://mathworld.wolfram.com/LHospitalsRule.html

I hope that was helpful.

Regards,
Matt

Hi Rit,

Thank you for asking this question.  First choose your parameters, then make your function.

example - 

a:=1:b:=2:c:=3:d:=4:
sol:=b*c+a*b;

Hope this helps.

Regards,
Matt

help_another.mw

Hi Rit,

I made a little example where I filled 2 vector and then made a plot.

The code is here -

> a := [1, 2, 3, 4, 5];
> b := [0, 3, 4, 2, 1];
> plot(a, b);

A Maple screenshot can be found at -

https://sites.google.com/site/mcasandbox/cc-r

scroll to the bottom and find the file named

Hi MalphiteGG,

the command

mod(3,0)

gives a division by zero error.  Maybe this is your problem.

Regards,
Matt

Hi,

This may help answer your question.  You have a nice Maple proceure, maybe with a flaw.

Maybe this code will help you.

What do you want your procedure to do?

g := proc (z)
local a, digitsInZ;
description "list the digits of z and print the number of digits in z";
digitsInZ := ceil(log10(z));
for a from digitsInZ by -1 to 1 do
print(floor(z/10^(a-1))-10*floor(z/10^a))
end do; print();
print(digitsInZ, " digits in that number")
end proc;

g(53);

g(12305);

Regards,

Matt

Hi Mehdi,

Thank you or asking this question.  I have a partial answer for you.  For me, I need to check that there are no background pocesses running on my machine.  And for the Distributed Computing projects that I work on, a powerful Graphical Processing Unit is helpful.  I do not know if Maple can run on a graphics processing unit, but for the calculations that we do, it runs somehing like 50 times faster for trial division.

See www.fermatsearch.org/

Regards,

Matt

Try these commands - 

with(plots);
complexplot(log(-1+exp(I*a)), a = 0 .. 2*Pi);

Hope that helps.

Matt 

Hi,

I couldn't fully understand your question.  Here is the part I could read from my browser - 

> tolerance = 10^(-3); x1km1 := 0; x2km1 := 0; x3km1 := 0; for k to 2 do k := k; x1k := 1/4*(5-x2km1+x3km1); x2k := 1/3*(-4+x1km1-x3km1); x3k := 1/5*(1-2*x1km1-2*x2km1); evalf(x1k); evalf(x2k); evalf(x3k) end do;

just as a code style note, I would have put 

for k from 1 to 2 do 

although leaving out the 'from 1' part is also acceptable.

The output is see on my Maple window is the same as in the question.

I found an article that teaches the concept of tolerance.

http://edufire.com/content/articles/101-gmat-gre-math-the-tolerance-problem

In my understanding, tolerance is half the maximum value minus the minimum value.
-Matt 

I tried to put your system into my Maple program, but it didn't know what W(r) is.

-Matt

Hi,

Here is some Maple code that exports the real part and the imaginary part of an rtable to Excel. 

> a := rtable(1 .. 2, 1 .. 4, 1 .. 3);

> a[1, 1, 1] := 2+sqrt(-3^2);

> e := rtable(1 .. 2, 1 .. 4, 1 .. 3); f := rtable(1 .. 2, 1 .. 4, 1 .. 3); for b to 2 do for c to 4 do for d to 3 do e[b, c, d] := Re(a[b, c, d]); f[b, c, d] := Im(a[b, c, d]); end do end do end do;

> with(ExcelTools);

> Export(e[1, 1 .. 4, 1 .. 3], "Employees.xls", "Payroll", "B2");

> Export(e[2, 1 .. 4, 1 .. 3], "Employees.xls", "Receiving", "B2");

> Export(f[1, 1 .. 4, 1 .. 3], "Employees.xls", "Shiping", "B2");

> Export(f[2, 1 .. 4, 1 .. 3], "Employees.xls", "Deliverables", "B2");

Hi Amr,

I woud rewrite your A matrix term by term.

A:=[[1,0,0,y11,y12,y13,-x1,a*x1],

[0,1,0,y21,y22,y23,-x2,a*x2],

[0,0,1,y31,y32,y33,-x3,a*x3],

[b*y11,b*y12,b*y13,z11,z12,z13,0,0],

[b*y21,b*y22,b*y23,z21,z22,z23,0,0],

[b*y31,b*y32,b*y33,0,0,0,0,0],

[x1,x2,x3,0,0,0,0,0],

[0,0,0,0,0,0,0,q]];

a:=Matrix(8,8);

see InverseTutor(a)

also this might help

M := `<|>`(`<,>`(1, 2, 0), `<,>`(2, 3, 2), `<,>`(0, 2, 1))

Good luck

Matt

Hi Meisje,

I couldn't find a FOC function built into Maple.  I found a foci() function for the foci of a curve.  Some functions that may be useful to you are collect(fn,n) and simplify()

Regards,

Matt