Good day.

When I export an animated 3D (surface contour) plot to a gif format, the image is incomplete (please see attached file).

Can anyone suggest a way to reformulate the expressions so the animated plot can be exported to Powerpoint intact?

Thanks for reading!

MaplePrimes_Dec_5.mw 

Hi all !

I have a list of coupled ordinary differential equations 

L := [e1,e2,e3] = [diff(z(t), t, t)*m = 0, diff(x(t), t, t)*m - B*diff(y(t), t)*q = 0, diff(y(t), t, t)*m + B*diff(x(t), t)*q = 0] with unknown functions x(t),y(t),z(t).

I want to obtain the list of "normal forms" of the ode using the DEnormal function. The help page says that it is possible to use it with an operator list but none example is given. 

Thanks!

Kevin

December and Maple 2021.2 have both arrived, which means that we can look forward to year 2022 and Maple 2022.

        What should we like to find new in Maple 2022?  Here follow a few suggestions, to which readers of Maple Primes can add.

        In my opinion the weakest feature of Maple 2021 is the solution of integral equations.  Even when this package was first introduced into Maple, a couple of decades ago, it was weak, applicable to only linear such equations.  A quarter century earlier, David Stoutemyer (a true genius and entrepreneur, originator of Mu-Math, Mu-Lisp, Derive and computer-algebra capabilities incorporated in calculators of Texas Instruments) had published code for non-linear integral equations, based on Reduce.  There is a Handbook of Integral Equations by Polyanin and Manzhirov that lists about 2000 solutions of integral equations.  Let Maple 2022 be the basis of a boast by Maplesoft for Maple to be able to solve 96 per cent of those equations, in the same way that Edgardo Cheb-Terrab can (rightfully) boast that Maple can solve 96 per cent of differential equations in a standard compilation.  Any differential equation can, apparently, be converted to an integral equation, whereas the converse is not true.  For this reason alone, the development of solution of integral equations should become a priority to assist users of Maple.

        Another area worthy of expansion and enhancement is the solution of differential equations in terms of Heun functions; that capability is already present, but working with those functions in their present form is difficult and slow.  The inclusion of related functions, such as Lame functions, into Maple is long overdue.  Although efforts have been devoted to the development of the physics package in recent years, culminating in a tremendous achievement of capability, only a few physicists in the world can appreciate that luxury, whereas the solution of differential, and integral, equations permeates all science and engineering. 

          What items are on your list of wishes for Maple 2022?

Dear all, 

I am trying to use the Physics package to perform a simple computation about the expression of speed and acceleration in the local polar basis (Frenet). I am trying to get something like :

Define the position vector :

differentiate wrt t to get the velocity vector 

simplifying 

Similarly :

simplifying

Can anyone please help me ? Many thanks!

So I just noticed that if you want to animate something in real time, the best you can achieve is something close but not exact.

For example lets say we have a ball travelling 22 m/s over 1000 m and I want to animate that in real time. 

ball := proc(x, y) plots[pointplot]([[x, y]], color = blue, symbol = solidcircle, symbolsize = 40); end proc:
animate(ball, [22*t, 0], t = 0 .. 1000/22, frames = floor(1000/22));

frames has to be an integer value so determining how long it will take and adjusting the frames to 1 frame per second.  It requires a bit of manipulation to get it right.  Is there a better way?  I suppose boosting the frame rate and increasing the number of frames would work but then it becomes cumbersome and any large period of times would use a high number of frames and consume enormous amounts of memory. 

Hi

I found the Manipulate Equation command tool in Maple and was wondering whether it could help me rearrange my equations into giving me certain quotient? One can do it by hand, but at an exam, time saved makes a difference and one can make silly mistakes. The math rearangement is also rather trivial...

Download rearrangemanipulate.mw

Any thoughts would be greatly appreciated, thanks in advance..!

Dear all;

I have a data, I would like to save this data in a table with labeled columns and  each column contains the corresponding values.

cretae_tabl.mw

thank you for your help 

Hi

I am trying to evaluate the following, and have tried the following commands;

How do I evaluate such an expression, is there a way to get around the invalid product error in the "coded approach"? Obviously the latter doesn't work, Maple naturally needs information concerning the limits, how does one apply assumptions to this more "traditional notation"?

Any thoughts would be greatly appreaciated, thankyou in advance.

Download integratederivative.mw

In Maple, to take the exponent of a term of the form $x^a$, we can define 

    Exponent := proc(x::`^`) 

    local r; 

    r := op(2, x); 

    return(r);

    end proc:

This also works for a term of the form $Y[1,3]^{-1/3}$.

But this does not work for taking exponent of a term of the form $Y[1,3]$. How to define a function $f$ in Maple, such that $f(Y[1,3]^{a}) = a$ for any $a \in \mathbb{Q}$? Thank you very much.

I am trying to use type(sqrt(t)*Y[1, -3]*Y[2, -6], monomial) to check if an expression is a monomial. But it returns false which is not correct. How to check that an expression in Maple is a monomial? Thank you very much.

How I can change this to smooth curve

 The vertex connectivity of a graph  is the minimum number of vertices whose removal disconnects the  
  graph. With Maple, it's easy to get the connectivity of a graph, but  I can not  find a smallest vertex cut of 
the graph g by maple. 

 If a graph has some cut vertices, I see that the function ArticulationPoints seems to be able to solve.
 But for general smallest vertex cut, I don’t see a suitable function.  For example

with(GraphTheory):
G:=CompleteGraph(2,2,2,2);
DrawGraph(G);
VertexConnectivity(G)

6

This seems easy to do in Mathematica. See https://reference.wolfram.com/language/ref/FindVertexCut.html.

Plotting of a nonlinear differential equation?

I have not used Array much before. I made an array that has 3 elements, starting index is 0 and last index is 2.

I want each element in the array to be an empty list, so I can later add to it.  (since I do not know in advanced what size of list I need in each slot of the Array).

Array(0..2,[seq([],i=0..2)])

And this works in the code I am using. But the strange thing, each time I try to save the worksheet, I get Warning about saving Large calculation.

What large caclulation? The array is empty?

Even though the code is working, and I can add to each entry in the array lists OK and been using it OK, I think may be I am not doing something right.

How to correctly creat an Array from 0..N  and initialized each entry to empty list?

Maple 2021.2

Every time I open Maple it has the invitation to Login in the top right-hand corner.  I would like to sign in but have had quite a bit of trouble doing that.  I have a user name and password with Maplesoft web store and the same for MaplePrimes.  Should either of these work to log in?