Hello:

I would like to be able to extract data from a plot strucutre. So say I've done:

p:=plot([sin(x), cos(x)],x=0..1, legend=["sin","cos"]):

display(p);

now I can see the raw strucuture with

lprint(p):

but not quite sure how to extract two lists of tuples that contain the data. I would also like to extract the two items in the legend.

Does anyone know how to do that??

thanks.

eqn1:=(1-x)*exp(c*d*M*z + a*(1-d)*M*y+(M/2))-x*exp(-c*d*M*z - a*(1-d)*M*y - (M/2))=0;

eqn2:=(1-y)*exp(a*d*M*x + b*(1-d)*M*z+(M/2))- y*exp(-a*d*M*x - b*(1-d)*M*z - (M/2))=0;

eqn3:=(1-z)*exp(b*d*M*y + c*(1-d)*M*x+(M/2))- z*exp(-b*d*M*y - c*(1-d)*M*x - (M/2))=0;

When I try to solve this system of equations as:

solve( {eqn1,eqn2,eqn3},{x,y,z} );

or 

solve( {eqn1,eqn2,eqn3,0<x,x<1,0<y,y<1,0<z,z<...

Hello:

I am trying to be able to solve my plots into a file programatically (not via right click/export).

when I do this:

p:=plot(sin(x));display(p);

plotsetup(default):  #optional - just to be sure start off at default.
plotsetup(ps, plotoutput="test.eps", plotoptions=`portrait,noborder`);
display(p);

things work ok

BUT.. doint this:

Hello all,

I'm sorry that I'm just not very good at working with Maple's optimization tools, but I appreciate your willingness to work with me. So, this is all related to the same problem I had been working with a few months ago. I used the "operator form" of NLPSolve to minimize the squared residuals of a temperature distribution with an external dataset by changing a few...

Hello,

I do want to export as  LATEX input (displaying only 3 digits) my matrix "tableau".

After using

latex(  evalf(tableau),   3 )

I get too many decimals. What should I do to send as latex input only 3 decimals. My commands are below and my worksheet attached.

Thanks in advance for any help,

Jean-Jacques

restart:
f1 :=  (w1, w2,n) -> add(add(

Hello,

It is obvious why my command

interface(precision=3) 

is not working?. I get 10 decimals(commands below and output in attached file).

I hope it is easy to fix.

Kindest regardsSSSzzzz

Jean-Jacques

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

Hello,

I'm making a simple for loop with a few lines.  I just figured out how to Shift + Enter to go to a new line without yet executing.  How do I indent my code on the next line, like in every other programming language ever made?  The Tab key does nothing.

Thank you.

Suppose N numbered cars start a race with starting positions N < ... < 4 < 3 < 2 < 1, car number 1 starting in front. (the car's index is the position on the starting grid) The race covers a total of L laps.

If two successive cars are in the position i < j, the probability that i overtakes j within 1 lap is P(i,j). This probability is independent of the position on the track and is constant throughout the race. For instance, if the starting positions...

Hi:

I have justdiscovered that the following "simplify" command gives the wrong answer on Maple 11. Could someone please check to determine if Maple 14 does any better?

> S1:=Sum(1/GAMMA(j+1)/GAMMA(2-j)*GAMMA(1+a-c+j)*GAMMA(1+a-b+j)/GAMMA(a-
> 1+j)*GAMMA(-2+b+c-j+n-a),j = 0 .. 1);
> Ans1:=simplify(S1);

          1
        -----
         \

Hello,

My array contains numbers like

[ 0.333333 0.211111]

I used the command

interface(displayprecision=3)

and it is displayed  [ 0.333  0.211]   (which is ok).

However, when I send the output to latex

latext(%)

I get again [ 0.333333  0.211111].

How  could I display  only 0.333   after using LATEX(%)?

I have to prove a trig identity with Maple for class. It's rather simple, but I can't figure out how to get the right-hand side into the form I want. What I have is:

tan(x)^2*sin(x)^2 = sin(x)^4/cos(x)^2

I simply want to convert sin(x)^4/cos(x)^2 into tan(x)^2*sin(x)^2.

The conversion is apparent to anyone looking at it but I simply cannot figure out how to put it in the right form, and I can't change the left-hand...

Hi all,

I have those functions

M:=n->piecewise(And(n::integer,(n/p)::odd),((4*Br)/(mu0*Pi*(n/p)))*sin((Pi/2)*(n/p)),0);

W:=(n,r)->piecewise(And(n::integer,(n/p)::odd),(M(n)*r)/(mu1*(1-n^2)),0);

u1:=(r,theta)->sum((r^n*AI[n]+r^(-n)*BI[n]+W(n,r)*sin(n*theta0))*sin(n*theta)+(r^n*CI[n]+r^(-n)*DI[n]+W(n,r)*cos(n*theta0))*cos(n*theta),n = 1 .. nn);

diff(u1(r,theta),r);

Error, (in type/polynom) too many levels of recursion

Hi all,

I need to find a specific temperature which I named T2 to cross the zeroline in a plot but maple doesn't plot or give a solution at all. I'm very confused and also new with this software.

My code is as follows:

R = 8.314472;
> A = 1.935;
> B = 36.915*E-3;
>
> C = -11.402*E-6;
> P2 = 10*10^5;
> P1 = 101300;
> T1=365;
> Tc=425.1;
> Tw=T2/T1;
> Pc = 37.96*10^5;
> Pr1=P1/Pc;
>

Hello,

I have got a question. I have an Hamiltonianfunctionand want to differentiate this function to all variables. There is no problem with most of the variables, but one doesn't work. The error above occures, when I use the button "execute the entire worksheet". When I just press Enter, the errror does not occure and the right results are presented. But I am not abel to use the results.

Has anyone an idea how I can solve this problem?

Thanks in advance.