MaplePrimes Questions

Hi everyone!

I'm double checking a result from maple.  When I substitute maple's solution into the differential equation, left side does no equal right side.  Does anyone have some insight into this?

thanks

the maple file is below

is_this_correct.mw

Is it possible in maple to resume an asymptotic expansion from a specific order onwards.

To be more specific.

Let's assume that I have the asymptotic expansion to say Order 20 already calculated or can import it from file.

Is it possible for Maple to use the expansion I already have and immediately start calculating Order 21 onwards ?

This will save a lot of time for numerical  expansions that can take literally days to complete.

Hey guys, 

I am working with Maple 2024. I have to solve many systems of polynomial equations symbolically. I have 8 equations, 8 variables and 14 inequalities (which also implies that I only want real solutions). In my opinion the equations are not too difficult. However there is a maximum of up to 4 variables multiplied together which could be a problem. Since I have to solve thousand of those systems I need to reduce the amount of time needed. While many of the systmes only take a few seconds, there are a few systems (10%) that need way to much time (multiple houres, sometimes I stop the process before the computation is over). 

In my attached file you can see the kind of equations I have. While "equations_500 union inequalities" only needs a few seconds, "equations_1162 union inequalities" needs more than 2 houres (than I stopped). 
I also tryed a second approach. At first I just solved the 8 equations. Then I took every solution, combined it with the set of inequalities and solved it again. Not only does it not work for equations_1162 eather, but it also sometimes brings the warning "solutions may have been lost" which is not really convincing. For that process I also used "with(RealDomain) since I only want to find real solutions when solving the eight equations in the first step. 

I figured out, that for the normal and simpel solve command it cqn help to rename the variables so the lexigraphic order as the initial situation playes a role. But when I understood the pages explaining SolveTools or Groebner, this optimal order of the variables is completed automatically inside these environments. 

So my question is: Is there any way to accelerate the process (in this case for equations_1162)? Waiting some minutes isfine, but I cant wait houres for one solution. 

Thank you in advance. 

solve_system_of_polynomials_with_inequalities.mw

Suppose I want to run several systems of equations as below, however, the processing time exceeds 45 thousand seconds (reaching hours of calculations)

  • What is better, buying a new processor (new notebook) or buying a new stick of RAM?
  • Or does none of this affect Maple? Therefore, it is just a computational disadvantage (the delay time), characterizing the slowness of the program for very large systems as an imminent characteristic.
  • Another question: The newer Maples (new versions) seem to be heavier to run. Is it just me? What seems to me is that the previous versions of Maple, because they contain fewer resources, are lighter and run certain calculations faster. Would this be correct?
  • Last question: Is it possible to do parallel processing in Maple? So that calculations on huge systems can be run faster

Thank you so much! :)

Help me, I want to make this system be stable on graphs? How to make this system stable in plot?

This is my model:

dx/dt=\[Alpha]*
  x[t]*(1 - (x[t]/n)) - ((\[Beta]*x[t]*
     y[t])/(1 + (\[CapitalTau]*\[Beta]*x[t]))) - (x[
    t]*\[CapitalEpsilon]);
dy/dt=y'[t] == -\[Gamma]*y[t];

Prove: If a is an irrational number, then the function y = cos (ax) + cos x is not periodic.
Is it possible to graphically represent or calculate this fact using an example?

Has anyone else seen this? My email address is displayed in the question box. I have the same thing on both my home Pc and work Pc. It will not delete either. Well it comes straight back. This began on Sunday.

I try to get some Bilinear form for some PDE equation  and already i have algorithm by writing in lecture but i can't apply i don't what is mistake i did, and i didn't seen some of this lecture code in maple  like (myint(expr,var))
 i  do upload PIcture of algorithm and example which they get Bilinear form 

Bilinear.mw

thanks for any help

I have a 2-parameters quartic equation in n (where n>=2 and integer) and want to find for which parameter values it is zero, if any exists.

Here I am analyzing the signs of each coefficient, but is there a faster way to solve my problem?
Thanks.

quartic_equation_in_n.mw

I am creating an algebra that includes shift operators. These operators commute with one another, but do not commute with anything else. I know that the Physics package enables you to make symbols non-commutative, but I would still like these operators to commute with one another. How can I do that?

Maple code example p.136 programming guide.

Explain the function of the word "divisible" in this maple code?

Why isn't divisible defined with an operator like -> ?

 

>L:= [seq( i, i=2..100)]:

> divisor := 2:

>while ( numelems( L ) > 0 )

do

divisible, L := selectremove( i->(i mod divisor = 0), L ):

n := numelems( divisible );

if ( n > 0 ) then

printf( "%d integer%s whose smallest prime divisor is %d\n",

n, `if`( n > 1, "s", "" ), divisor ):

end if;

divisor:=nextprime(divisor);

end do:

If a point is chosen in the Euclidean plane, then it is red or black.
It must be proven that there is then an equilateral triangle with corners of the same color.

dsolve gets stuck on a problem. Attached is the worksheet.

In Case I, dsolve solves the two ODEs separately. In Case II, dsolve solves them together, but only if I define a constant. In Case III the constant is not defined. dsolve never returns, and I have to hit the stop sign. The question I have: Is there a consistent method to the failure so that I can avoid the problem in the future with other ODEs?

dsolve_bug.mw

Question: Is there a style for the icons from the palettes? 

(The rest of this post is a screenshot because MaplePrimes can't show the change in fonts.)s a

How do I get alpha to display as the Greek letter in DataFrame Row column?

restart

#varp:=alpha

QQFProj := proc(q12::algebraic, q23::algebraic,
                q34::algebraic, q14::algebraic,{varp:=:-alpha},
                  prnt::boolean:=true) #{columns:=[QQFproj,Q13proj,Q24proj]}
  description "Projective quadruple quad formula and intermediate 13 and 24 quads. Useful for cyclic quadrilaterals";
  local qqf,q13,q24, sub1,sub2,sub3, R,values,DF,lens;
  uses   DocumentTools;
  sub1:= (q12 + q23 + q34 + q14);
  sub2:=-4*(q12*q23*q34);
  sub3:=64*q12*q23;
  qqf:=(sub1+sub2)^2-sub3;
  q13:=(q12-q23)^2;
  q24:=varp*(q23-q34)^2;
  if prnt then
  
   values:=<qqf,q13,q24>;
   DF:=DataFrame(<values>, columns=[`"Values Equations"`],rows=[`#1  QQF`,`#2  Q13`,cat(`#3  Q24 (`,varp,`)`)]);
   lens := [4 +8* max(op(length~(RowLabels(DF)))),4+ min(max( 10*(length~(values))),1000)];#op(length~(ColumnLabels(DF)0)
   Tabulate(DF,width=add(lens),widthmode = pixels,weights = lens);
  return qqf,q13,q24
  end if;
  return qqf,q13,q24
end proc:

 q12:=1/2:q23:=9/10:q34:=25/26:q41:=9/130:#Cyclic quadrilateral
q12:=sqrt(17+a)/2:q23:=(r^2+t^2)^2/10:q34:=((a+b+c)^4/26):q41:=sqrt(17+b)/130:

Q:=QQFProj(q12,q23,q34,q41,true):

Download 2024-12-01_Q_Data_Table_alpha_as_Greek_Letter.mw

1 2 3 4 5 6 7 Last Page 1 of 2375