Maple Questions and Posts

These are Posts and Questions associated with the product, Maple

fyi;

Maple 2021.1 on windows 10.

Screen in worksheet displays this (correct)

But latex generated when compiled using lualatex from TEXLIVE 2021 shows this

code 

sol:=(Vector(2, [x(t),y(t)])) = (Vector(2, [8*c[1]*exp((1/2+1/2*89^(1/2))*t)/(-3+89^(1/2))-8*c[2]*exp((1/2-1/2*89^(1/2))*t)/(3+89^(1/2))+2/11*t^2-3/11*exp(t)-2/121*t+23/1331,c[1]*exp((1/2+1/2*89^(1/2))*t)+c[2]*exp((1/2-1/2*89^(1/2))*t)-1/11*t^2-15/22*exp(t)+12/121*t-17/1331])):

sol:=simplify(sol);

latex(sol)

`Standard Worksheet Interface, Maple 2021.1, Windows 10, May 19 2021 Build ID 1539851`

`The "Physics Updates" version in the MapleCloud is 1105 and is the same as the version installed in this computer, created 2021, November 8, 23:55 hours Pacific Time.`

zip file attached include the latex file and worksheet used.

issue_latex_nov_6_2021.zip

What happened to the graph output?

Just to update a bit to be more specific as what I did.

I have been using Maple since 2007 and never had such problems before 2012, when I did my PhD and switched to Mathematica.

1 - Right clicked on the graph and export to PDF - low quality (not seem like vector graphics)

2 - Print using Adobe PDF Printer from the system - low quality (not seem like vector graphics)

3 - EPS is fine, but WHHHHYYYYY????? Is this a bug??

[code] with(plots): z := x + I*y: inequal([ evalc( abs(z+1-I)    ) <= 1, evalc( argument(z-1) ) <= 3*Pi/4 ], x = -2.0..1.5, y = 0..2.2 , scaling = constrained, transparency = 0, numpoints = 500 ) [/code]

I want to calculate the Noether Symmetries from the Lagrangian. Is there any built-in Maple cammad to  where i just put the lagrangian and get the determining PDEs and calculate the Noether Symmetries?

Hello everyone!

I made an integration and it gave me a really long answer. The answer of the book is the same, as you can see, i "smartplotted" the two answers, and they are the same. But how do i get the nice short answer? I tried a lot of different things, but nothing gave me that short answer. 

I would really like to be able to get nice short answers, while it will really clean things up. 

Thank you!

Greetings,

The Function

int((v^2-1)*(v^3-3*v+6)^5, v)

(1/18)*v^18-v^16+2*v^15+(15/2)*v^14-30*v^13+180*v^11-(585/2)*v^10-300*v^9+1539*v^8-1350*v^7-(4239/2)*v^6+5994*v^5-4050*v^4-3888*v^3+9720*v^2-7776*v

(1)

NULL

"f(v):=1/18 v^18-v^16+2 v^15+15/2 v^14-30 v^13+180 v^11-585/2 v^10-300 v^9+1539 v^8-1350 v^7-4239/2 v^6+5994 v^5-4050 v^4-3888 v^3+9720 v^2-7776 v"

proc (v) options operator, arrow, function_assign; (1/18)*v^18-v^16+2*v^15+(15/2)*v^14-30*v^13+180*v^11-(585/2)*v^10-300*v^9+1539*v^8-1350*v^7-(4239/2)*v^6+5994*v^5-4050*v^4-3888*v^3+9720*v^2-7776*v end proc

(2)

"f1(v):=1/(18)*(v^(3)-3 v+6)^(6)"

proc (v) options operator, arrow, function_assign; (1/18)*(v^3-3*v+6)^6 end proc

(3)

smartplot(f(v), f1(v))

 

(1/18)*v^18-v^16+2*v^15+(15/2)*v^14-30*v^13+180*v^11-(585/2)*v^10-300*v^9+1539*v^8-1350*v^7-(4239/2)*v^6+5994*v^5-4050*v^4-3888*v^3+9720*v^2-7776*v

(1/18)*v^18-v^16+2*v^15+(15/2)*v^14-30*v^13+180*v^11-(585/2)*v^10-300*v^9+1539*v^8-1350*v^7-(4239/2)*v^6+5994*v^5-4050*v^4-3888*v^3+9720*v^2-7776*v

(4)

(1/18)*(v^3-3*v+6)^6

(1/18)*(v^3-3*v+6)^6

(5)

``

``

Download Question_for_maple_primes_6.mw

I want to know how to remove an error message from the last line of using Maple.  I must have made some kind of error, but I want to move on but I can't get past the error message.  How can I remove the error message.  I have tried using "restart" but nothing happened.  I'm stuck until I clear this error message from the last line of my worksheet.  Can you help please?

Thanks

Dave

PS: as you can guess I'm pretty new to Maple.

restart; p := .5; n := 10; nseq := 2; with(Statistics); randomize(); x1 := seq(Sample(RandomVariable(BernoulliDistribution(p)), n), i = 1 .. nseq); x2 := seq(convert(x1[i], list), i = 1 .. nseq)

[HFloat(0.0), HFloat(1.0), HFloat(0.0), HFloat(0.0), HFloat(0.0), HFloat(1.0), HFloat(0.0), HFloat(0.0), HFloat(0.0), HFloat(1.0)], [HFloat(0.0), HFloat(1.0), HFloat(1.0), HFloat(1.0), HFloat(0.0), HFloat(0.0), HFloat(1.0), HFloat(0.0), HFloat(0.0), HFloat(0.0)]

(1)

x2[1]

[HFloat(0.0), HFloat(1.0), HFloat(0.0), HFloat(0.0), HFloat(0.0), HFloat(1.0), HFloat(0.0), HFloat(0.0), HFloat(0.0), HFloat(1.0)]

(2)

whattype(x2[1])

list

(3)

numboccur(x2[1], {0.})

0

(4)

NULL

But, when I plugged the list at (2) it works...  

numboccur([0., 0., 1., 1., 0., 0., 1., 0., 0., 0.], 0.)

7

(5)

``

NULL

NULL

Download numboccur.mwnumboccur.mw

Hello everbody! 

Ive got a question about my dutch math book, and why it thinks its answer is better than mine. 

It is question c. the integral that is covers the x value from 4 to 6 for f(x). 

I would think that means the integral of 1 to 6 - the integral of 1-4, and thus 4-7=-3. Now i dont know how they thought about getting a smaller area under the function with a larger domain of x, so i am not sure what is going on. Im not even sure if what they ask is possible. The book gave 3 as an answer. My answer was -3. Looking at it, and thinking about it. It may not even be possible. 

Any way, that is the question. 

Picture 2 shows the rules, picture 3 shows the answers of the book. 

Thank you!

Greetings,

The function

Opdracht 2
a.

0

b.

-7

c.

4-7

-3

(1)

d.

8*5

40

(2)

e.

int(5, x = 1 .. 6)+4

29

(3)

f.

3*4-6*5

-18

(4)

``

Download Question_for_maple_primes_5.mw

Let f(x) = x3+9x2-9x-1/x4+1

Find the equations of the 4 lines having slope 0.5 that are tangent to the graph of 𝑓(𝑥) (first find the values of 𝑥 where 𝑓 ′(𝑥) = 0.5).

Hello there,
I'm currently working on a school-related assignment, where I have to put two functions equal each other to find their crossing point. My issue is, that these two functions are waves, and continiue into infinite.
If I put them equal as this, my document crashes:
f(x) = g(x)

My question is then, if I can put some requirement to Maple, so it only calculates from significant X-intervals

elctroWav.mw have the equation 1 :

eq1 := 2*m*(E + e0^2/(rb*rho))*g(rho, t)*(-rb*rho + R)/(h^2*R) + R*(diff(g(rho, t), rho, rho)*(-rb*rho + R)/R - 2*diff(g(rho, t), rho)*rb/R)/(rb^3*rho) - diff(g(rho, t), t, t)*(-rb*rho + R)/(a^2*c^2*R) = 0;

with iv1:

iv1 := D[1](g)(0, 0) - g(0, 0)*rb/R = rb*R, g(1, 0)*(R - rb)/R = 0, D[2](g)(rb, 0) = a*c;

As in maple document electroWav.mw

The issue is that there is an unsolved part with RootOf how can I rezolve it?

-R*h^2*RootOf(AiryBi(-(R*_Z^3*h^2 + 2*e0^2*m*rb^2)/(_Z^2*R*h^2)))^3

Please advice...

restart;In this code "add" is a trouble.
A := Matrix([[1, 2, 1, 3], [1, 1, 2, 1], [1, -2, 5, -11]]);
cs := LinearAlgebra:-ColumnSpace(A);
cnames := [seq(c || j, j = 1 .. numelems(cs))];
cvals := seq(solve([entries(A[() .. (), k] -~ add(`*`~(cnames, cs)), 'nolist')], cnames)[], k = 1 .. op([1, 2], A));
seq(add*rhs~(cvals[k]) *~ cs, k = 1 .. op([1, 2], A));
add does not play its role. Why. Thank you.

Is there an easy command to generate the edge sets of of all connected graphs for a given number of vertices? Ideally, I'd like to output to be of the form (e.g.)

G={{1,2},{2,3},{1,3},{1,4}};

text text text text;

text1 text1;

so that I can easily copy it into another program to be read. Or, is there a way that I can produce an output like the following (e.g. for n=3)

G={{1,2},{2,3}};

text text text text;

text1 text1;

G={{1,2},{2,3},{1,3}};

text text text text;

text1 text1;

and have it export to a text file?

The timelimit command of Maple can be used to do a computation if it uses less than a given amount of time, otherwise generating an error message that can be cought by try ... catch. Now my question is that there exists any similar command, but with a limitation on memory usage, not the time usage. I don't mean what datalimit in kernelopts can does, because I am not going to limit the memory usage of the whole Maple session, but just a command which may be used inside a larger procedure etc.

Hello.

I wrote some codes for solving equations in a special way. My codes work very fine when my differential system has only one equation.

But when I extend it to a system that has two or more equations, sometimes does not work and I face with error. However, in one system (2 eq) it also works. But it is only a special case. If you want, I can upload it here as well.

I am attaching the maple file containing the error. You can observe it. 

By examining many cases, I think that maybe the root of the problem is that I must change my codes in a way that they are for a "system". Indeed, instead of writing codes for each differential equation, I must define a system and write these codes for a system containing some differential equations.
However, I think that the boundary conditions sometimes also may be the root of the error.

I change the attached codes for this purpose, but I failed. I prefer to not present my wrong codes for this purpose. 

If it is possible, help me to change my codes.

Thanks a lot.

ERROR.mw

Solve equation :x4-x3-3x2-x+12=0

3 4 5 6 7 8 9 Last Page 5 of 1861