How can I remove the extra whitespace around a 3D plot and also scale it so it takes up quite a bit of the window so I can see more detail?

If I use a density plot then I can set the size using

_SP := proc(P,sz::[posint,posint] := [1200,500])
  op(0,P)(remove(type,[op(P)],'specfunc(ROOT)')[],
          ROOT(BOUNDS_X(0),BOUNDS_Y(0),
               BOUNDS_WIDTH(sz[1]),BOUNDS_HEIGHT(sz[2]))):
end proc:

 

to get exactly what I want. With 3D plot there is a lot of whitespace. I'd rather use plot3d since it is more confirgurable but I need to be able to remove all that additional whitespace(which I guess has to do with rotation in 3D, but here I'm not rotating it, although I might want to in some cases).

 

I am trying to solve a differential equation numerically. But I am facing some difficulties. It is saying that ODE system has a removable singularity at r = 0. How can I remove the singularity?  Please check the attached figure and try to help.

hello i am trying to remove "[ ]" from an expression so it can be used inside a solve function.

the problem is (eqs) has an "[ ]" outside the expression so it lookslike this "[a = c, a = d, 4*a = e, b = 2*e, b = c + 2*d + 2*f]"

how can i remove [] from this expression?

 

code

eq := a*(K + Mn + 4*O) + b*(H + Cl) = c*(K + Cl) + d*(Mn + 2*Cl) + e*(2*H + O) + 2*f*Cl;
elems := [K, Mn, O, H, Cl];
eqr := collect(expand(rhs(eq)), elems);
eql := collect(expand(lhs(eq)), elems);
eqs := zip(`=`, map2(coeff, eql, elems), map2(coeff, eqr, elems));
solve([eq, eqs, a = 1]);

 

thanks

An ellipse of focus F1 and F2 is considered in which the focal length F1F2=2c is equal to the length 2b of the short axis; the length of the long axis is 2a. M being any point of this ellipse, calculate the lengths MF1=x and MF2=y according to a and angle F1MF2 = alpha. What is the maximum value of alpha? Thank you for your help.

When translating initial conditions, for derivatives, to Latex, the output is not easy to read, and was wondering how to make it more standard.

For example, let say initial conditions for second order ODE are [y(0)=0,D(y)(0)=3] in Maple syntax.  I convert these to Latex using

restart;
ic:=[y(0)=0,D(y)(0)=3];
Physics:-Latex(ic)

which gives

               [y \left(0\right) = 0, D\left(y \right)\left(0\right) = 3]

The problem is with derivatives. They are hard to read, unless someone knows Maple. The above renders are

I'd like to get the above to standard form 

Which more easily understood and is the standard in textbooks and papers.

This issue does not show up in Mathematica, because in Mathematica initial conditions can be entered as  {y[0]==0,y'[0]==3} and this translates directly as is

Which renders a

I know in Maple document mode, 2D math input, one can also enter the IC the same as with Mathematica, which is easier, but the Latex translation still the same as with the worksheet 1-D math.

Going back to Maple, I could enter the initial conditions instead as follows

restart;
ic:=[y(0)=0,eval(diff(y(x),x)=3,x=0)];
Physics:-Latex(ic)

And now the latex generated renders as

Which might be more understandble but too heavy weight compared to the simpler form y'(0)=3 and I remember reading that use eval() as above is not as safe as using the D(y)()... notation for initial conditions.

Are there any other tricks that would allow the latex of derivative to show in the standard form to make it easier to read?

Is it possible for Physics:-Latex to automatically detect the form D(y)(x0)=y0 and generate y'(x0)=y0 for its Latex? This will be the ideal solution. This will apply to higher derivatives as well. For example 

Physics:-Latex( (D@@2)(y)(0)=3)

Now gives

         D^{\left(2\right)}\left(y \right)\left(0\right) = 3

which renders as

While a much better output would be the standard

This will go a long way towards improving the Latex generated by Maple.

Any suggestions?

 

 

Hi!

What could be a fast procedure to cancel uncommon factors of terms in such following sets (list) and simplify:

Starting with:

{a*x,b*x, c*(x+y)}

(where a, b and c are numbers or in set of specified variables as well as x and y), I would like as a result:

{x,x+y}

 

Many thanks.

 

Jaqr

Here is my code (will attach a screenshot below with the errors, since the formatting gets wonky if I try to paste it as text)

What might be the problem here? I seem to have proc and end proc, but Maple seems to be dividing my code into two sections, and evaluating them separately

https://imgur.com/a/npbF9NG

Hello again,

I want to maximize a function u(k,x) with the following form

u := (k, x) -> (1 - theta(sP, sL))((p + sP)*q(x) - w(k)*x + sL) + theta(sP, sL)*b(k)

where theta, q, b, w have previously being defined and (sP,sL) are parameters. I want to maximize u and therefore,

with(Optimization):
Maximize(u(k, x), variables = {k, x}, k = 0 .. 1);

My question is how to tell Maple that I want my optimal solution, (k*,x*) to be expressed as a function of (sP,sL)?

 

First, I want to find the set of solutions of this system and then find the steady state vector.

I know that I can find an approximation of the steady state vector ''directly'' if I calculate P^k for big k values (one column of P^k will give me an approximation), but it's not what I want to do. I need the complete set of solutions with a free parameter.

LinearSolve() doesn't give me the set of solutions. See the picture below. Here Q is the transition matrix.

I hope my question is clear (:

Please answer the questions posed in the body of the uploaded worksheet.

The worksheet employs the command DirectSearch[SolveEquations]. Responders must establish their own connection to the DirectSearch package.

Invert_Torus.mw

When i enter  Physics:-Version() I see the output

The "Physics Updates" version "859" is installed but is not active. The active version of Physics is within the library

   C:\Program Files\Maple 2020\lib\maple.mla, created 2020,  March 4, 20:36 hours

 

I tried to install it using Maple Cloud. The installation is stuck as seen below. Also i deleted the text file in the toolbox 2020 folder, maybe in the hope of starting from scratch.
 

Can someone please explain what to do to manually add the physics update, step by step. I am not that computer savvy as some of the users appear in other posts , I did try reading some.
I tried to download the physics update manually but I keep ending up with the same maple worksheet that says you need to use maplecloud.

In case you cannot read the text in the image

Version: Maple 2020.1

When i set the color for the gridlines it only seems to be applied for the major-tick gridlines as the following trivial example shows:

plot(sin(t), t = 0 .. Pi, axes = frame, background = "#303030", color = "Orange", axis = [gridlines = [color = "#707070", linestyle = dot]])

I assume it must also be possible to also specify the color for the minor tick-marks gridlines?

The obvious (?) variant "axis=[gridlines = [color = ["#707070", "#707070"] , ... " just seems to crash maple (nothing happens when the plot() expression is evaluated).

I'm unable to find anything in the documentation regarding this and it only seems to imply that the color should be applied to both major & minor gridlines which is not the case.

?

 

 

 

 

Hi everyone! Currently I'm studying magnetism, and I was thinking that maybe seeing represented the helix movement of an atom with a vector v parallel to the Magnetic Field B subject to the Force of Lorentz and the Hysteresis cycle created in the magnetazation of a ferromagnetic material could help me understand it more. I tried to create the plots in Maple 2015 but I couldn't.. anyone can help me by creating those two plots?

I notice that when I enter ?convert or ?convertininto the maple prompt, the help window opens once and then ceases to function.

Update. It seems that the problem is not restricted to a specific command, this occurs for any command. To replicate, open help using F1, exit maple help, then open help again using F1. Maple help won't open again. I have to do a hard exit to get it to work again.

Platform details:

Hello,

Recently I switched from Mathematica to Maple. I have the following code 

solve({pf'(e)- psi'(e) - tau - mu*pi(tau)/(1 - pi(tau)) = 0}, {tau}) assuming 0 < p, 0 < tau, 0 < mu, 0 <= pi< 1

and I am getting a result of 

RootOf(-D(pf)(e)*pi(_Z) - mu*pi(_Z) + _Z*pi(_Z) + 2*pi(_Z) + D(pf)(e) - _Z - 2)

I have to questions: (a) what does that _Z means? (b) is it possible to express the above solution in a more "readable" way?

Thanks in advance