MaplePrimes Questions

Question 1 - How would you enter this in Maple Flow 2022?

I can create "i sub C" by pressing "space+ underbar" two times

but I can'g get (t) ... the "function of t" to go with C as part of the subscript.

So, how would you enter this into Flow 2022?

Question 2 - I watched this video ... Taking Derivatives in Maple 15 and he demonstrates right clicking to get a "Context Menu" ... I was unable to get this to work in Flow 2022 ... should it work or is that feature only avaible in Maple?

Thanks for any help.

Switching font to Arial apparently makes the sign disappear in MathContainers.

Vorzeichen.mw

If i want to do mathematical modelling for planetary motion, how can maple help me with it?

 I want to plot phase portrait but i get some errors. I didn't understand errors? Can anyone help me? zuhal_faz_portresi.mw

Dear power users, I probably have 2 dummy questions, which I show in the attached worksheet. 

1. it looks to me that the equation can be further simplified than done by maple

2. is there a quick way in cleaning up the array by replacing the strings by something as NaN (not a number) so that I can use the array for numeric calculations?

Thank you for helping me out     Download Questions.mw

simplify((x^2-2)/(x-sqrt(2)))

(x^2-2)/(x-2^(1/2))

(1)

why is the above not simplifying to x+sqrt(2)

x+2^(1/2)

(2)

``

How can I replace the strings in the matrix below by something like NaN (not a number) so I can use it for further numeric calculations?

 

Error, invalid assignment

"dat:=[[124.0,124.0,22.0,2.2],[130.0,160.0,20.0,4.4],[130.0,129.0,26.0,4.3],[119.0,115.0,21.0,">2,6"],[136.0,129.0,30.0,4.9],[118.0,126.0,24.0,2.9],["NA / 101",115.0,20.0,3.0],[130.0,118.0,21.0,2.4],[95.0,94.0,25.0,3.4]]"

 

``

Download Questions.mw

As we know, since the order about the element Perm([[1, 2], [3, 4, 5]]) of S5 is 6. Then  the C6 is a subgroup of S5, but why IsSubgroup(CyclicGroup(6), SymmetricGroup(5)) return false? Is it a bug?

Of course, we know the A5 of 60 order is an unsolvable group, but as the wiki here, There are also some solvable groups in the same 60 order. Similarly, although map(IsSolubleNumber, [60, 120, 168, 180]) will give false, there are some solvable groups in orders 60, 120, order 168, and order 180. But how to find these corresponding solvable polynomials by maple? I tried to generate them using random polynomials like this:

with(GroupTheory);
do
    do poly := randpoly(x, degree = rand(6 .. 8)()); until irreduc(poly);
    G := GaloisGroup(poly, x);
until IsSoluble(G) and is(GroupOrder(G) in {60, 120, 168, 180});
poly;
galois(poly, x);

But I didn't get any result even after one night..

Hi folks

If you try this simple integral 

simplify(int(P(q)*(Dirac(k-q)+ Heaviside(k-q)),q = 0..infinity)) assuming k>0; 

it returns int(P(q), q = 0 .. k), completely ignoring the delta function. However, if you expand the integral first:

simplify(value(IntegrationTools[Expand](Int(P(q)*(Dirac(k-q)+ Heaviside(k-q)),q = 0..infinity)))) assuming k>0;

 it gives the correct answer 

P(k) + int(P(q), q = 0 .. k)

Looks like a bug to me?

Cheers!

I've been asking a similar question:

How does Maple call external programs such as nauty?

Recently I used Mathematica to call these gadgets very succinctly, so I revisit the topic, and maybe Maple can do it as well, but I just didn't do it the right way.

  • nauty and Traces are programs for computing automorphism groups of graphs and digraphs. There is a small suite of programs called gtools included in the package. For example, geng can generate non-isomorphic graphs very quickly. 
  • plantri and fullgen are programs for generation of certain types of planar graph.

We note that binary executables of above two programs for Windows are not officially available. Fortunately, I recently compiled them by cygwin.  Of course, other operating systems can make it easier to use them. See attached two compressed files of compiled nauty and plantri programs for Windows.

The official websites of the two programs are listed below.

So, I found that Mathematica works very well for running these programs by Import. We list the following two examples: first example is to get all non-isomorphic 10-order 2-partite connected graph, and the second example is to get all 14-order non-isomorphic  quadrilateral graphs (the planar graphs in which any face is 4-face).

glist10 = Import["!D:/nauty27r3/geng -c -b 10", "Graph6"]; // AbsoluteTiming
Length[glist10]

g14 = Import["!D:/plantri52/plantri 14 -q -g ", "Graph6"] // AbsoluteTiming

 

I tried maple's Import or ImportGraph functions, but both failed.

restart: 
with(GraphTheory):
L:=ImportGraph("!D:/nauty27r3/geng -c -b 10 -g",output=list):
L2:=Import("!D:/nauty27r3/geng -c -b 10 -g"):

Error, invalid input: GraphTheory:-ImportGraph uses a 2nd argument, format (of type {string, symbol}), which is missing
Error, (in Import) must specify format for this input

The problem seems to be not recognizing compilations symbols " !".  I don't know if Maple can do this like mathematica.

Dear all

I need to  `Put markers to emphasize the point of intersection between f, and g

iteration.mw

thank you

Given a polynomial, e.g. 3*x^2 + a*x*y + b*y^2, is there some built-in function which can give me a list of monomials, with each monomial represented as [coefficient, [exponent_of_x, exponent_of_y]] ? The above polynomial would turn into something like [ [3, [2,0]], [a, [1,1]], [b, [0,2]] ].

It's not difficult to write this procedure from scratch. The procedure would require two arguments: (1) the polynomial itself, (2) which symbols are considered variables (in the above case, x and y). The remaining variables, a and b, would then be treated as constants that appear as coefficients. But I'm wondering if there's a built-in function I can just use.

Hi everyone, Could you help me to get a general solution to the following ode? Here rho and z are constants.

ODE := cos(g(t))^2*(diff(T(t), t, t))-3*rho*(diff(g(t), t))*cos(g(t))*sin(g(t))*(diff(T(t), t))+(Omega^2*cos(g(t))^z-8*rho^2*(diff(g(t), t))^2*sin(g(t))^2+2*sin(g(t))*cos(g(t))*(diff(g(t), t, t))*rho+2*(cos(g(t))^2)(diff(g(t), t))^2*rho+2*rho*(diff(g(t), t))^2*sin(g(t))^2)*T(t) = 0

cos(g(t))^2*(diff(diff(T(t), t), t))-3*rho*(diff(g(t), t))*cos(g(t))*sin(g(t))*(diff(T(t), t))+(Omega^2*cos(g(t))^z-8*rho^2*(diff(g(t), t))^2*sin(g(t))^2+2*sin(g(t))*cos(g(t))*(diff(diff(g(t), t), t))*rho+2*(cos(g(t)))(diff(g(t), t))^4*rho+2*rho*(diff(g(t), t))^2*sin(g(t))^2)*T(t) = 0

(1)

dsolve(ODE, T(t))

T(t) = DESol({-(-Omega^2*cos(g(t))^z+8*rho^2*(diff(g(t), t))^2*sin(g(t))^2-2*sin(g(t))*cos(g(t))*(diff(diff(g(t), t), t))*rho-2*(cos(g(t)))(diff(g(t), t))^4*rho-2*rho*(diff(g(t), t))^2*sin(g(t))^2)*_Y(t)/cos(g(t))^2-3*rho*(diff(g(t), t))*sin(g(t))*(diff(_Y(t), t))/cos(g(t))+diff(diff(_Y(t), t), t)}, {_Y(t)})

(2)

NULL


Thanks.

Download ode_rlmt.mw

Does maple software support Benders decomposition technique for Mixed Integer Linear Programming? If no, how we can implement it in maple? Any suggestions. 

Thank you

x := [0, 1, 2, 3, 4, 0, 1, 2, 3, 4, 0, 1, 2, 3, 4, 0, 1, 2, 3, 4, 0, 1, 2, 3, 4]

y := [0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4]
z := [0, 0, 0, 0, 0, 0, .689376362, 1.378752724, 2.068129087, 2.757505449, 0, 1.02920355, 2.0584071, 3.087610649, 4.116814199, 0, 1.216469264, 2.432938529, 3.649407793, 4.865877057, 0, 1.325720912, 2.651441823, 3.977162735, 5.302883646]

How to plot the contour plot for the given data

i want that maple show the value on countor plot like this

with(plots)

contourplot(x*y/486, x = -h/2 .. h/2, y = -a/2 .. a/2, filledregions = true)

First 75 76 77 78 79 80 81 Last Page 77 of 2195