MaplePrimes Questions

Good evening, how do I get Maple to graph and shade the intersection area of ​​the curves? Can someone please tell me how to do this? I have used implicitplot but I don't know how to shade the area.

I'm sure this has been asked and answered, but I can't find the correct MaplePrimes page on it. How does one generate an array plot where the plots are centered within each box and not left justified? I need to make a PDF out of the document with an array plot of 1 column and 2 rows. (The following is just an example.) 

Bernoulli first order ode has form as show in wikipedia  and also on Maple own site as

Notice that it is P(x)*y above and not P(x)* y^(-1) so the y(x) must be linear in that term.   But when I give Maple this ode

ode:=diff(y(x),x) + x*y(x)^(-1)= y(x)^(-1);

Which is clearly not of the form above, it solves it as Bernoulli.  In the above ode, P(x) is x and Q(x) is 1 and n is -1.

The ode advisor correctly said it is separable. But trace shows it used Bernoulli. Also when asking it to solve it as Bernoulli, it does.

What Am I missing here?  Is it not wrong for Maple to use Bernoulli method on this ode which is not Bernoulli?

Worksheet below

interface(version);

`Standard Worksheet Interface, Maple 2024.1, Windows 10, June 25 2024 Build ID 1835466`

Physics:-Version();

`The "Physics Updates" version in the MapleCloud is 1805 and is the same as the version installed in this computer, created 2024, September 3, 11:35 hours Pacific Time.`

libname;

"C:\Users\Owner\maple\toolbox\2024\Physics Updates\lib", "C:\Program Files\Maple 2024\lib"

restart;

ode:=diff(y(x),x) + x*y(x)^(-1)= y(x)^(-1);
IC:=y(1) = 0;
DEtools:-odeadvisor(ode);

diff(y(x), x)+x/y(x) = 1/y(x)

y(1) = 0

[_separable]

infolevel[dsolve]:=5;

5

dsolve(ode,y(x));  #why this says it solved it as Bernoulli ?

Methods for first order ODEs:

--- Trying classification methods ---

trying a quadrature

trying 1st order linear

trying Bernoulli

<- Bernoulli successful

y(x) = (-x^2+c__1+2*x)^(1/2), y(x) = -(-x^2+c__1+2*x)^(1/2)

dsolve(ode,y(x),[Bernoulli])

Classification methods on request

Methods to be used are: [Bernoulli]

----------------------------

* Tackling ODE using method: Bernoulli

--- Trying classification methods ---

trying Bernoulli

<- Bernoulli successful

y(x) = (-x^2+c__1+2*x)^(1/2), y(x) = -(-x^2+c__1+2*x)^(1/2)

 

 

Download why_this_ode_bernullli_sept_15_2024.mw

Dear Maple community,

I was going to export my math assignment about vector functions as an PDF, when I noticed that it butchered every column vector printed out in blue in the document as math-output. I only have this issue when exporting my work.

How do I make Maple display both coordinates of vector in the blue output field?

I produced the below image as an illustration of my problem:

Thank you in advance.

Why can't the variables in my procedure be called? Omega1, Omega2, Q1, Q2 are all expressed in the form of local variables in the loop, why can't we solve the equation because there are too many variables? At the same time, I would like to ask how to output the results of Q1 and Q2?

equation915.mw

Why can the coeff operator return the coefficient of 1/b, namely -1/x in the example below correctly,

but cannot return the coefficient of 1/x , which should be -1/b?

dummy := asympt(x*1/(1 - a*x - b*x^2), x);
coeff(dummy, 1/x);
coeff(dummy, 1/b);

What one generally wants is to be able to return the coefficients of the orders of an asymptotic expansion, but coeff seems unable to do that as soon as you want the coefficients of 1/x^n

Maple help pages is silent about this.

I am now running eveything in cmaple.exe for number of reasons. But I find the plot generated do not show grid lines as it does in worksheet (GUI). 

Below is worksheet I used, and below that the .mpl file used for command line with the command used.
 

interface(version);

`Standard Worksheet Interface, Maple 2024.1, Windows 10, June 25 2024 Build ID 1835466`

restart;

plot(x, x=0..1, axis=[gridlines=[10, color=blue]]);

 


 

Download why_no_grid_in_cmaple_sept_15_2024.mw

Here is the T.mpl file

currentdir("C:/tmp");  #change as needed

#the following commnad below export a plot to a file

plotsetup(ps, plotoutput="t.ps",plotoptions=`color,noborder`);

p0:=plot(x, x=0..1, axis=[gridlines=[10, color=blue]]):

print(p0); #this will create t.ps in same folder

plotsetup(default); #rest back to default

quit;

 

Now I run the above as follows

"C:\Program Files\Maple 2024\bin.X86_64_WINDOWS\cmaple.exe"   T.mpl

Next I convert t.ps to t.pdf using Adobt PDF pro. The output is this

You see, there are no grid lines. I tried changing the color to BLUE, but it made no difference. Tried difference colors also. nothing worked.

Is there a way to keep the grid lines when using cmaple.exe?

I also attached  t.pdf converted by adobe from the .ps file. Mapleprime will not let me attached t.ps file.

t.pdf

 

 

Is this new error in Maple? I do not have older versions to check.

Solved this ode as series. When calling odetest on it, it gives this error as shown in worksheet below.

Maple 2024.1.

Any work arounds?
 

interface(version);

`Standard Worksheet Interface, Maple 2024.1, Windows 10, June 25 2024 Build ID 1835466`

Physics:-Version();

`The "Physics Updates" version in the MapleCloud is 1805 and is the same as the version installed in this computer, created 2024, September 3, 11:35 hours Pacific Time.`

libname;

"C:\Users\Owner\maple\toolbox\2024\Physics Updates\lib", "C:\Program Files\Maple 2024\lib"

restart;

ode:=-(A/( (1-x)*x^4) - B/( x^4*(1-x)^2)+C/( (1-x)*x^2))*y(x)+1/(1-x)*diff(y(x),x)+diff(y(x),x$2)=0;

-(A/((1-x)*x^4)-B/(x^4*(1-x)^2)+C/((1-x)*x^2))*y(x)+(diff(y(x), x))/(1-x)+diff(diff(y(x), x), x) = 0

Order:=3;
maple_sol:=dsolve(ode,y(x),'series','point'=1);

3

y(x) = c__1*(x-1)^(1-(1-B)^(1/2))*(series(1-((-4*B+A+C)/((1-(1-B)^(1/2))^2+B-1))*(x-1)+((4*A*(1-(1-B)^(1/2))^2-10*B*(1-(1-B)^(1/2))^2+2*C*(1-(1-B)^(1/2))^2+A^2-4*B*A+2*A*C+6*B^2-6*B*C+C^2-4*A+10*B-2*C)/(((1-(1-B)^(1/2))^2+B-1)*((1-(1-B)^(1/2))^2+B+2-2*(1-B)^(1/2))))*(x-1)^2+O((x-1)^3),x = 1,3))+c__2*(x-1)^(1+(1-B)^(1/2))*(series(1-((-4*B+A+C)/((1+(1-B)^(1/2))^2+B-1))*(x-1)+((4*A*(1+(1-B)^(1/2))^2-10*B*(1+(1-B)^(1/2))^2+2*C*(1+(1-B)^(1/2))^2+A^2-4*B*A+2*A*C+6*B^2-6*B*C+C^2-4*A+10*B-2*C)/(((1+(1-B)^(1/2))^2+B-1)*((1+(1-B)^(1/2))^2+B+2+2*(1-B)^(1/2))))*(x-1)^2+O((x-1)^3),x = 1,3))

odetest(maple_sol,ode,'series','point'=1)

Error, (in odetest/series) when calling 'MultiSeries:-multiseries'. Received: 'unable to sort exponents, {(1-B)^(1/2), -(1-B)^(1/2), 1-(1-B)^(1/2), 1+(1-B)^(1/2), 2-(1-B)^(1/2), 2+(1-B)^(1/2), 3-(1-B)^(1/2), 3+(1-B)^(1/2), 4-(1-B)^(1/2), 4+(1-B)^(1/2)}, MultiSeries:-multiseries'

 


 

Download error_odetest_series_sept_14_2024.mw

This is my file
 

restart;
F := proc(ee, LL) Typesetting:-mrow(InertForm:-Typeset(InertForm:-Display(eval(eval(InertForm:-MakeInert(factor(ee)), [`%*` = `*`]) = InertForm:-MakeInert(map(sort, algsubs(a*x = InertForm:-MakeInert(a*x), ee), order = plex(b))), `=`~([a, b], LL)), inert = false)), Typesetting:-mo("="), InertForm:-Typeset(eval(ee, `=`~([a, b], LL)))); end proc;
p := a^3*x^3 + 3*a^2*b*x^2*y + 3*a*b^2*x*y^2 + b^3*y^3;
L := [[2, 3], [1, 2], [1/3, -sqrt(2)]];
ans := F~(p, L);
print~(ans);

I get 

I want to the order of terms of the polynomial, e.g, (2 x + 3y)^3 like this

(2 x + 3 y)^3 = (2 x)^3 + 3 (2 x)^2 (3 y) + 3 (2 x) (3 y)^2 + (3 y )^ 3 = 8*x^3 + 36*x^2*y + 54*x*y^2 + 27*y^3. 

How can I get that

Solving differential equations, Maple sometimes unfortunately returns the solution in an utterly  unusable form I never encountered a use for.

As an example a solution was found assuming separation of variables. Maple returns the following solution,

X(ts) = DESol({diff(_Y(ts), ts, ts) + (a^4*m^2*cos(ts)^4 etc. etc. etc.}, {_Y(ts)})

Is there a command where I can just get the argument of the solution, namely the differential equation diff(_Y(ts),ts,ts) + etc  ?  or even better as diff(X(ts),ts,ts) + etc   as I intended and expected it to be without the silly and unnecessary proxy variable _Y(ts) ?

It is such a pity that Maple return these results not as a differential equation in F2(ts), but gives the result in a proxy variable which isutterly unnecessary.

Anyway, if anyone knows a command just to get the argument of the solution above to get rid of all the unnecessary and proxy structure, I will appreciate it as I currently copy the solution and redefine it, which can introduce errors and destroys the generality of the document.

A classic result states that the equation x3px2qxr=0 with real coefficients p, q, r has positive roots iff p<0, q>0, r<0 and -27r2 - 2p(2p2 - 9q)r + q2(p2 - 4q) ⩾ 0 (see for example this question). 
However, Maple appears unable to find the condition: 

a, b, c := allvalues(RootOf(x^3 + p*x^2 + q*x + r, x), 'implicit'):
RealDomain:-solve({a, b, c} >~ 0, [p, q, r]);
 = 
Warning, solutions may have been lost
                               []

Is there a way to get the above conditions in Maple with as little human intervention as possible (I mean, without a priori knowledge of the theory of polynomials)? 

Edit. An interesting problem is when these three positive roots can further be the lengths of sides of a triangle. For reference, here are some (unenlightening) results from some other software: 

I don't know how make my graph be beter for real part and imaginary part and abs part which part how work with parameter can any one explain on this example?

G.mw

I have this file
 

restart:
F := proc(ee,LL)
  uses InertForm, Typesetting;
  mrow(Typeset(Display(eval(eval(MakeInert(factor(ee)),[`%*`=`*`])
                                 =MakeInert(subs(b=MakeInert(b*y)/y,
                        a=MakeInert(a*x)/x,p)),[a,b]=~LL),
                       inert=false)),
       mo("&equals;"),Typeset(eval(ee,[a,b]=~LL)))
end proc:
p := (a*x)^2 - 2*a*x*b*y + (b*y)^2:
L := [[sqrt(2),3],[2,5],[3,12],[1/3,5/7]];
ans := F~(p, L):
print~(ans):

How can I put the results like this
 

\documentclass[12pt,a4paper]{article}
\usepackage[left=2cm, right=2cm, top=2cm, bottom=2cm]{geometry}
\usepackage{amsmath}
\usepackage{amsthm}
\usepackage{enumitem}
\theoremstyle{definition}
\newtheorem{ex}{Exercise}
\begin{document}
\begin{ex}
\[(\sqrt{2} x-3 y)^2=(\sqrt{2} \cdot x)^2-2 \cdot(\sqrt{2} \cdot x) \cdot(3 \cdot y)+(3 \cdot y)^2=2 x^2-6 \sqrt{2} x y+9 y^2.\]
\end{ex}

\begin{ex}
\[(2 x-5 y)^2=(2 \cdot x)^2-2 \cdot(2 \cdot x) \cdot(5 \cdot y)+(5 \cdot y)^2=4 x^2-20 x y+25 y^2. \]
\end{ex}

\begin{ex}
\[(3 x-12 y)^2=(3 \cdot x)^2-2 \cdot(3 \cdot x) \cdot(12 \cdot y)+(12 \cdot y)^2=9 x^2-72 x y+144 y^2. \]
\end{ex}

\begin{ex}
\[\left(\frac{x}{3}-\frac{5 y}{7}\right)^2=\left(\frac{1}{3} \cdot x\right)^2-2 \cdot\left(\frac{1}{3} \cdot x\right) \cdot\left(\frac{5}{7} \cdot y\right)+\left(\frac{5}{7} \cdot y\right)^2=\frac{1}{9} x^2-\frac{10}{21} x y+\frac{25}{49} y^2. \]
\end{ex}
 
\end{document} 

I've recently started to move my Maple software development from pure Maple to Visual Studio Code with GitHub. Previous code attachments in workbooks are now moved to its own folders, and fetched by the $include instruction.

The approach works quite well, but I have experienced a strange effect. While the Maple workbook itself is in the local GitHub folder, I do experience that when documents within the Maple workbook, after a while the code is fetched from the backup location. This doesn't work, as the $included files can't be found there. Only way is to close the workbook, and open it again.

First image shows location of Maple workbook, second location of document (backup position, error), third location of document after reopening workbook (working).

For a month I did do not get email notfications.

I checked spam folders, settings and email filters.

Is it only me?

First 6 7 8 9 10 11 12 Last Page 8 of 2363