Maple 16 Questions and Posts Maple 16 Questions and Posts Feed

These are Posts and Questions associated with the product, Maple 16

Hi everyone,

I need to write a program to save some files in both Windows or Unix System.

The structure of the path files is different from windows to Unix, so i want to something like this

if (WindowsOS) then

        pathFILE := "\\MyDirectory\\blabla.txt";

elif (UnixOS) then

       pathFILE := "\/MyDirectory\/blabla.txt";

end if;

 

Thanks for help.

Dear Mapleprimes members,

I am trying to understand some known classical theorems of geometry (thales intersection thm, ceva, menelaus ) from the perspective of affine geometry and projective geometry.(my paper/pencil work is ok.. But I would like to use  Maple to visualize -if possible - geometrically some theorems and properties in a graph)

How could I do it in maple? Where may I get some examples?

thank you,

 

JeanJ

Hi there,

i want to generate some plots in files in this example:


this code doesn't work. but without restart; it works fine. i passed 2 days to figure out that "restart;" was the problem.

my questions are :

1. why i have to eliminate the first line of restart;

2. how can i save my files in a directory that is in the current directory. For example i have a directory in current directory named "plotFILES".

thanks in advance for your help

Hello all, 

During my last attempt to solve ODE system (autonomous system which includes 3 first order diff. equations) with initial conditions, Maple had performed the solution which includes d_z1 parameter as follows below (I present the solution of one of the equations):

S(t)=S(0)∫(QN_z1+A)d_z1, where integral ∫ is defined integral from 0 to t, S(0) is the initial value of S, Q, N and A are the parameters. I would like to ask, what does it mean _z1 and d_z1? Why if the ODE system is only time dependent, I received the integral with other differential, that is d_z1? Does it mean that the integral can't be evaluated or maybe something else?

Thanks in advance,

Dmitry

 

 

Dear Experts,

 

Analytical integration is not a choice for the integrals listed here. Hence, Maple is not able to find the numerical integration for the following oscillatory functions. However mathematica can. However, before I take the mathematica results, just need to check with you.

Following link shows that for a diverging series, the (Numerical) integral is finite.

http://books.google.com.sg/books?id=vntDnyh0gacC&pg=PA664&lpg=PA664&dq=nintegrate++seqlim&source=bl&ots=iNYR1o6kVd&sig=VuiQuiUMDEEGOBnguSwfcPPSHQA&hl=en&sa=X&ei=k_J4UofXJYjNkwW79IDYBw&ved=0CE4Q6AEwBA#v=onepage&q=nintegrate%20%20seqlim&f=false

 

1)

 Maple: 

eval(int(r^2 BesselJ(1,r)* BesselJ(0,r), r = 0..infinity)) 

Float(undefined)

Mathematica: 

NumberForm[ NIntegrate[BesselJ[0, x]*BesselJ[1, x]*x^2, {x, 0, Infinity},   AccuracyGoal -> 20], 15]

SequenceLimit::seqlim: The general form of the sequence could not be determined, and the result may be incorrect. >>

-95982.37707206068

 

2)  Maple:
       eval(int(r* BesselJ(0,r), r = 10..infinity)) 

                         Float(undefined)

Mathematica: 

NumberForm[ NIntegrate[BesselJ[0, x]*x, {x, 10, Infinity},   AccuracyGoal -> 20], 15]

SequenceLimit::seqlim: The general form of the sequence could not be determined, and the result may be incorrect. >>

-0.434727

 

Any conclusions on the result.

a) Why maple not able to evaluate the integrals.  b) Are the result of the Mathematica can be considered as appropriate.

 

Attached is the maple file for your consideration.

Integrations.mw 

 

Lookinf forward to your reply.

 

Thanks.

I've been having trouble plotting in polar coordinates. My code is included below:

The ouput prints the 10 terms of the sum but the plot does not produce anything.

I also would like to know a method that I could use to plot with a going from zero to the size of the radius.



Thank you for any help.

Hello

Am trying to convert a vector projection to matrix type output.

Attached is a sample worksheet.

 

Transformation_matri.mw 

 

Dear Maple forum,

 

given A, B real numbers,

and after defining the recurrent sequence

 

x(0) = A

x(n) = 0.5* x(n-1)^3 + B

 

I would like to see a graphic of x(n) on the plane x(n) - n.

how could I implement in maple 16?

 

thank you for your help.

 

JeanJ

Dear sirs/madams,

I tried to use my MAPLE in a MacBook with a quiet large screen...however I see the letter sizes of my Maple16 very small (the same wiht the font size on input and ouput sheets..and everywhere)..

Is there some way to "see larger and bigger"?

Thanks for your attention,

 

JeanJV

I was asked to transform (x+y)^2+(1)/x+y into ((x+y)^3+1)/x+y, I have tried nomer/denom, but i don't how to factorise the nomer bit into (x+y)^3+1 because maple factorise it differently by default. therefore, it would be grateful if anyone can help me with this...please?

How do I define a function from a graph in a plot? 

Or how do I find the intersection between two lines? I have to find the intersection of 2 lines in a graph, while one of these lines consists of 2 different equations dependent from the same variable. 

 

Thanks in advance. 

I am trying to sort a list of symbolic values:

assume(0<=x<=1)
v := [x, 1/3-(1/3)*x] 

However, Maple can't do it because of the assumptions. Is there a function I can pass to sort() that would sort such a list correctly? I thought that sort(v, (a,b)->is(a>=b)) would work because it takes into consideration values which are equal to each other, but it doesn't - I get [1/3-(1/3)*x~, x~] no matter what ordering function I use.

Thank you.

I have a variable with some assumptions: assume(0<=W<=1).

Now, when I make a list and sort it, everything goes fine:

k := [W, (1/3)*W, (1/3)*W, (1/3)*W]:
sort(k, (a,b)->is(a>b))

I get [(1/3)W, (1/3)W, (1/3)W, W] as expected.

Now I try this:

k:= Vector[column]([W, (1/3)*W, (1/3)*W, (1/3)*W]) 
sort(k, (a,b)->is(a>b))

And Maple gets stuck on this computation. I have tried on both Windows and Linux, on several different computers.

Hello everyone,

I have a system of PDEs

restart:with(PDEtools):with(plots,implicitplot):

Pr:=1:A:=1:lambda:=1:Omega:=1:epsilon:=1:C1:=1:N:=5:b:=1:fw:=1:a:=1:

Eq1:=diff(f(eta,tau),eta,eta,eta)-diff(theta(eta,tau),eta)*diff(f(eta,tau),eta,eta)+

f(eta,tau)*diff(f(eta,tau),eta,eta)-(diff(f(eta,tau),eta))^2-(1+A*(1-theta(eta,tau)))*diff(f(eta,tau),eta)

+lambda*(1+epsilon*cos(Pi*tau))*theta(eta,tau)-Omega*diff(diff(f(eta,tau),tau),eta);

Hi, I need some help with my code. I got the code that you can see below:

> with(DEtools);

> with(plots);

 

> cc := Array(["Blue", "Red", "DarkGoldenrod", "Black", "LimeGreen", "DarkMagenta", "Indigo"]);

> ll := Array(...

4 5 6 7 8 9 10 Last Page 6 of 35