Thomas Richard

Mr. Thomas Richard

3255 Reputation

13 Badges

15 years, 62 days
Maplesoft Europe GmbH
Technical professional in industry or government
Aachen, North Rhine-Westphalia, Germany

MaplePrimes Activity


These are replies submitted by Thomas Richard

@fredbel6 Well, in programming tasks like this, I usually prefer lists over sets (one reason being Equate with constructs such as [0$n]), but you can proceed as follows:

f := (a*b+1)*x^3+(a+b+1)*x^2*y^2+(a-b^3)*x*y^2+a*y^10;
# f := collect(f,[x,y]);
fcl := [coeffs(f,[x,y])];
fn := numelems(fcl);
feqns := Equate(fcl,[0$fn]);

g := (a*b-1)*x^3+(a+b-1)*x^2*y^2+(a-b^3)*x*y^2+b*y^10;
# g := collect(g,[x,y]);
gcl := [coeffs(g,[x,y])];
gn := numelems(gcl);
geqns := Equate(gcl,[0$gn]);

eqns := {op(feqns),op(geqns)};
sol := solve(eqns,[a,b]);

Note that (a-b^3) appears in both polynomials, so we have a non-empty intersection (hence a non-trivial union).

@agomeunan The best way to find out is via our webstore.

@Carl Love Yes, you are correct, in both points. :-)

@Carl Love Sorry for nitpicking, but in "[...] a regular n-gon when n is a Fermat prime", that should be "when n is the product of a power of 2 (which might be 1, i.e. with exponent 0) and a Fermat prime" - that's what I learned in my abstract algebra course.

@Markiyan Hirnyk In 2D input, you need to remove the blank between simplify and the opening parenthesis, otherwise it will return unevaluated.

@Markiyan Hirnyk In 2D input, you need to remove the blank between simplify and the opening parenthesis, otherwise it will return unevaluated.

If you want to assign a value to lambda, you will need to use the := operator.

And for the exponential function write exp(...) instead of e^(...). Maple treats e just like any symbol.

@mriedel A somewhat simpler approach is

s := sum((-1)^(n+1)/(n^2+a), n=1..infinity);
ss := simplify(s,symbolic);
css := combine(ss);

Neither Maple nor Mathematica always return the "best" result for sum and similar commands.

interface(typesetting=extended): # bad
series(1/epsilon-log(4),epsilon=0);
interface(typesetting=standard): # good
series(1/epsilon-log(4),epsilon=0);

It's the so-called operator form, documented under ?if. There is one (trivial) example, so there could be more, agreed.

diff~(psi,x1);
is syntactically correct, but you will have to post your Matrix psi so that we can diagnose the problem.
You can also try map(diff,psi,x1); or LinearAlgebra:-Map(diff,psi,x1);

Yes, these are called Interdocument References. Please see ?interdocumentreference for more info. The feature was introduced in Maple 11.

Yes, these are called Interdocument References. Please see ?interdocumentreference for more info. The feature was introduced in Maple 11.

@zhong chen 

In Maple, open the help page ?MapleSim,LinkModel,Simulate as a worksheet, using the appropriate button. Optionally run it to make sure it works on your system and you get the output. Now extend the last part as follows:

p := plot(simData[1..-1,1],simData[1..-1,2]):

g := plottools:-getdata(p);

your_max := op([2,2,2],g);

Finally, adjust the filename in the LinkModel line to match your own file. E.g. mymodel.msim in your home directory:

A := MapleSim:-LinkModel('filename'=cat(kernelopts(homedir),kernelopts('dirsep'),"mymodel.msim"));

and run that worksheet again. You may skip the A:-Simulate() part, of course.

@zhong chen 

In Maple, open the help page ?MapleSim,LinkModel,Simulate as a worksheet, using the appropriate button. Optionally run it to make sure it works on your system and you get the output. Now extend the last part as follows:

p := plot(simData[1..-1,1],simData[1..-1,2]):

g := plottools:-getdata(p);

your_max := op([2,2,2],g);

Finally, adjust the filename in the LinkModel line to match your own file. E.g. mymodel.msim in your home directory:

A := MapleSim:-LinkModel('filename'=cat(kernelopts(homedir),kernelopts('dirsep'),"mymodel.msim"));

and run that worksheet again. You may skip the A:-Simulate() part, of course.

First 27 28 29 30 31 32 33 Last Page 29 of 40