MaplePrimes Questions

By printing each processing step for a parametric surface entered in 3-dimensional space,

i- Finding whether the surface is a ruled(regle) surface and printing it in the ruled surface form,

ii- Calculating the dispersion parameter of the surface and the throat line,

iii- Draws the surface and the throat line on the surface together,

When I run this code, I will get a error information:

CompositionSeries(SmallGroup(336, 209))

It's mean this function just work in transitive group? But IsTransitive(SmallGroup(336, 209)) will get true. Is it a bug of maple? Or do I have any misunderstandings?


I am using the following (dummy) code to generate a density plot.

densityplot(x-y^2, x=-5..5, y=-5..5, axes=boxed, style=patchnogrid, numpoints=1000, legendstyle=[location=bottom], labels=[x, y]);

While this command does generate x vs y plots with varying color shared, I cannot figure out where the function (x-y^2) value by looking at the color shades. Is there a way to produce a legend along with the plot that will demonstrate how the function is taking different values with parameters? 

I found a similar post, dated 2005, that suggests using the "s_tyle=" command. However, it does not work for some reasons. I would appreciate help in this regard. 

Thank you,


I know you can filter a dataframe by putting constraints on the numeric columns. However, I would like to sort and filter based upon a given string in a column, is this possible? I cannot immediately find this in the help files. Thank you for your

Hi MaplePrimes. 

I have a cubic with some parameters that I would like to solve and recieve 3 real solutions, however I cannot seem to find a way to get that to work while using assumptions. I always recieve 1 real and two complex conjugate answers. I have tried assuming the discrimant to be greater then zero but nothing seems to be working, and I have looked through a few posts on here but I cant seem to find anything out. In particular solve({f,conditions},{variable}) 

If I solve with a known set of paramters(which i determine graphically) that gives three solutions everything works fine. Also if I solve the cubic generally and recieve the two complex solutions and one real then substitute the paramters in I get the same correct answers, so I am slightly baffled. If I have missed something simple my apologies. 

Any help would be greatly appreciated. File attached.

HI, I have numerically solved the given problem using the dsolve command But I want to solve the same problem using the Differential transformation method.
Can anyone help me to get the series solution for the given problem using DTM.

I want to compare the numerical results with DTM results when lambda =0.5.

eqn1 := diff(f(eta), `$`(eta, 3))+f(eta)*(diff(f(eta), `$`(eta, 2)))-(diff(f(eta), eta))^2-lambda*(diff(f(eta), eta)) = 0.

eqn2 := diff(theta(eta), `$`(eta, 2))+f(eta)*(diff(theta(eta), eta))*Pr = 0

Bcs := (D(f))(0) = 1, f(0) = 0, (D(f))(infinity) = 0, theta(0) = 1, theta(infinity) = 0;

[lambda = .5, Pr = 6.3]

Evaluating this integral

Int(1/(sqrt(1-x)*sqrt(-x^2+1)), x = 0 .. 1); ((proc (x) options operator, arrow; x end proc) = value)(%)

Int(1/((1-x)^(1/2)*(-x^2+1)^(1/2)), x = 0 .. 1) = infinity*(Pi+1)


simplify(Int(1/((1-x)^(1/2)*(-x^2+1)^(1/2)), x = 0 .. 1) = infinity*(Pi+1))

Int(1/((1-x)^(1/2)*(-x^2+1)^(1/2)), x = 0 .. 1) = infinity



produces an infinite product as output. Why does Maple not automatically simplify to infinity. Can the extra information (1+pi) be of any use?



Please how can I define two sequences in a procedure with two arguments?

  ans:= Array([seq( [j, doCalc(j, u)], j=-2..0, 0.006, u=1..334)]):

The procedure is doCalc(j,u)  and I received this error: invalid input: seq expects between 1 and 3 arguments, but received 4

Find attached my complete

Good Morning Guys,

Please, could somebody help me with my problem in Maple?

The expression y' = y^4 * cos(x) + y*tan(x) with start-value y(0) = 0.5 has the solution of 1/root(cos(x)^2 * 8*cos(x)-3 * sin(x),3).

If I try to solve it with this method dgl_2 := diff(y(x), x) = y(x)^4*cos(x) + y(x)*tan(x) I don't get the right solution. Is it possible to solve this expression with a Tutor app? step by step? If yes I would so happy to tell me how I can do that. 

Thanks a lot and I wish you all a nice sunday and stay safe.

Is there a way to importing cell values as text, and not numbers, when the cell is formatted as a text?

As far as I can see, a cell with the value "1" is always import as "1.0" in ExcelTools, regardless if the cell is formatted as text or something else in Excel.

Writing '1 in the Excel cell however leads to a text import in Maple, and will give "1", not "1.0".

There is one more thing that is strange in Excel. Even if the cell is formatted as a text, or the cell content is with a ' before the number, Excel will allow a calculation with that value. Text value 4 will give 5, if added 1.

Dear maple user how to rectify the error  in solving the coupled differential equation using homotropy perturbation method and direct differentiations and compare the two result by plotting the graphs :

L:=4:Nb:=1:Nt:=1:#k is some constant
for i from 0 to L+1 do equa[1][i]:=coeff(HO1,p,i)=0 end  do:                                     
for i from 0 to L+1 do equa[2][i]:=coeff(HO2,p,i)=0 end  do:           
for j from 1 to L do:                                                                                                    
 end do;
for i from 0 to L do;                                                                                                     
end do; 
for u from 0 to L-1 do:                                                                                                
end do:  
#### direct calculations                      
#direct solve the two equations in terms of f(x) and g(x) for h(x)=e^x where Nt and Nb #are parameters and its takes some values example 1,1
Eq1 := (diff(f(x),x,x))+(((1/x)*(diff(f(x),x))+Nb*((diff(f(x),x))*diff(g(x),x))+Nt(diff(f(x),x)^2))):   
Eq2 := (diff(g(x),x,x))+(((1/x)*(diff(g(x),x))+(Nb/Nt)*((diff(f(x),x,x))+(1/x)*diff(f(x),x)))):       

Cd1 := f(0) = h(x), (D(f))(0) = 0:
dsys := {Cd1, Eq1}:
dsol := dsolve(dsys, numeric, output = operator):
plots[odeplot](dsol, [x, diff(f(x), x$1)], 0 .. 5, color = green):
Cd2 := g(0) = h(x), (D(g))(0) = 0:
dsys := {Cd1, Cd2, Eq1, Eq2}:
dsol := dsolve(dsys, numeric, output = operator):
plots[odeplot](dsol, [x, f(x)], 0 .. 5, color = red);
plots[odeplot](dsol, [x,g(x)], 0 .. 5, color = black);

This is the default style about the group of DrawSubgroupLattice:


But I hope to label the DrawSubgroupLattice with the order of the subgroup but not the default index, is it possible? I can get the order with this code:

GroupOrder~(SubgroupLattice(SymmetricGroup(4), output = list))

But I don't know how to label it into the node...

How to replace 7th-row(second last) of the matrix H116 (see eq. (14)) with the 1st-row of the matrix H16 (see eq. (15)) and create a new matrix of size same as H116?

I've run into a problem.  I'm trying to enter multiple quotes in a string.

for example


How to plot F(R) for R=0..100 ?

Maple 2021 sheet attached.

restart; i := I``


E := 100



"Z(R):=((5+5 i)*(R-10 i))/((5+5 i)+(R-10 i))"

proc (R) options operator, arrow, function_assign; (5+5*i)*(R-10*i)/(5-5*i+R) end proc



proc (R) options operator, arrow, function_assign; E/Z(R) end proc



proc (R) options operator, arrow, function_assign; abs(I__R(R)) end proc






plot(F(R), R = 0 .. 100)

First 51 52 53 54 55 56 57 Last Page 53 of 2173