How to prove  that there exists an integer number x s.t. x>0, x < 4*99! and x*(x+1) is divisible by 100! with Maple?
I know that was solved by C++ code.

Consider the ring R of upper-triangular matrices over the field of 3 elements.  I would like to have a multiplication table for this ring. Is it possible to generate such a table in Maple?  Thank you.

i wanted a taylor series  of the expression sin(xy) my code;

mtaylor(sin(x*y),[x=1,y=2],6); and it worked like a charm

sin(2)+2*cos(2)*(x-1)+cos(2)*(y-2)-2*sin(2)*(x-1)^2+(-2*sin(2)+cos(2))*(y-2)*(x-1)-(1/2)*sin(2)*(y-2)^2-(4/3)*cos(2)*(x-1)^3+(-2*sin(2)-2*cos(2))*(y-2)*(x-1)^2+(-sin(2)-cos(2))*(y-2)^2*(x-1)-(1/6)*cos(2)*(y-2)^3+(2/3)*sin(2)*(x-1)^4+(-2*cos(2)+(4/3)*sin(2))*(y-2)*(x-1)^3+(-2*cos(2)+(1/2)*sin(2))*(y-2)^2*(x-1)^2+(-(1/2)*cos(2)+(1/3)*sin(2))*(y-2)^3*(x-1)+(1/24)*sin(2)*(y-2)^4+(4/15)*cos(2)*(x-1)^5+((4/3)*sin(2)+(2/3)*cos(2))*(y-2)*(x-1)^4+(-(1/3)*cos(2)+2*sin(2))*(y-2)^2*(x-1)^3+(-(1/6)*cos(2)+sin(2))*(y-2)^3*(x-1)^2+((1/12)*cos(2)+(1/6)*sin(2))*(y-2)^4*(x-1)+(1/120)*cos(2)*(y-2)^5

now i need to plot the darn thing. so i tried to use tayplot function but i get nothing. is there a special package i need to use tayplot etc..?

Hello dear all,

I use maple 16, x64. When I run this code:

Student[Calculus1][ApproximateInt](cos(y/(-1+y)), y = 0 .. 1, method = lower, iterations = 1)

it results in "0.0667344650", exactly equal with the result of executing

Student[Calculus1][ApproximateInt](cos(y/(-1+y)), y = 0 .. 1, method = lower, iterations = 10000000000)

Any idea?

Best regards

How to do composition for finite group?

is the composition like permutation group ?

if express finite group like permutation group,

if so, can elements in first row duplicate? can the second row duplicate?

however, do not know how to map when there are more than or equal two choices

my guess is that

if finite group can be expressed into permutation group

for example 3*3 matrx, each column is a permutation group

then there will be 3 permutation groups, when do composition , first column's permutation group composite with first column's permutation group , second composite with second etc

is it right?

Hi all,

A  stupid question.

I noticed that there are some difference between the Vector and the Nx1/1xN Matrix, for example:

It confused me. Why Maple should distinguish the vector and the Nx1/1xN matrix? 

If it is due to the need of vector analysis, I refered to VectorCalculus of Maple Help and it seems that Maple used the additional package and command to handle the question about vector analysis, for example:

I'd appreciate any help on this topic. Thank a lot.

i understand quotient group is

G/(normal subgroup)

= G composite with inverse permutation group of normal subrgoup

is this understanding correct?

If do not have subgroup or normal subgroup, how to do quotient group?

if i shift second row many times in order to find Subgroup satisfy G*Subgroup = Subgroup*G

after find Subgroup then test

inverse(g)*Subgroup*g = Subgroup

how to test whether inverse(g)*Subgroup*g belong to Subgroup?

or just use equal in inverse(g)*Subgroup*g = Subgroup?

a*b - b*a    where a , b are permutation group

how to minus this?

if a + b , then how to plus permutation group

Hello, 

I have to show cubicspline(...) and some kind of known function on the same axis, but it seems I can only show cubicspline(..) using Draw, but it cannot plot the function, so I can do only one at a time. Does anyone know how to do it?

Hello everyone,

I need help to type in the following type of initial condition.

diff(1/x*diff(F(x),x),x)=0 at x =0.

Thanks

im trying to input a number between 0-100 and have the operation return the grade a,b,c,d,f. etc though long i though this might work.

Grades:=proc(x)
local a,b,c,d,f;
a:=(100..89.5);
b:=(89.4..79.5);
c:=(79.4..69.5);
d:=(69.4..59.5);
f:=(59.4..0);
if x=(100..89.5) then
display(a);
else
if x=(89.4..79.5)then
display(b);
else
if x=(79.4..69.5) then
display(c);
else
if x=(69.4..59.5) then
display(d);
else
if x=(59.4..0) then
display(f)
end;
end;
end;
end;
end;
end;

count the number of primes less than using an if-then statement.  Implement your code where j goes from 2 to 15. 

im at a loss i need a little nudge in the right direction.

Dear All,

I have a simple question I try to find the Fourrier Series of:

 f(x)=x*e^{I*x}

with maple or without maple.

Thanks

Salut,

Comment factoriser l'expression ci-dessous :

P(x,y):=-20736*x^7*y+72576*x^6*y^2-72576*x^5*y^3+72576*x^3*y^5-72576*x^2*y^6+20736*x*y^7+(-24192*3^(1/2)*x^6*y^2+72576*3^(1/2)*x^5*y^3-96768*3^(1/2)*x^4*y^4+72576*3^(1/2)*x^3*y^5-24192*3^(1/2)*x^2*y^6)*I;

Merci d'avance,

Gérard.

Dear all,

here, I propose two methods for Adams Moulton Methos, but which one can I used.

The n-step Adams Moulton method to solve y'(x)=F(x,y(x)) is defined by the stencil

y(x+h)=y(x)+h *sum_{j=-1}^{n-1} beta_j F( x-j*h, y(x-j*h) ) + O(h^{n+2})

I want a procedure with single argument ''n'' that calculates and return the ''beta_i'' coefficients

I get two Methods. Which one correspond to my question please, and I don't understand the procedure proposed.

For me; the first give the iterative schemae used, but don't return the vector coefficients ( beta_i) and this methode method an interpolation of the function.

The second method, there is a function f, how this function is maded, and the same for the matrux A and the vector b...

the First Method:

> Adamsmoulton := proc (k::posint)

local P, t, f, y, n;

P := interp([t[n]+h, seq(t[n]-j*h, j = 0 .. k-2)], [f[n+1], seq(f[n-j], j = 0 .. k-2)], x);

y[n+1] = y[n]+simplify(int(P, x = t[n] .. t[n]+h))

end proc;

Second Method:

f:=proc(x,y) if x =0 and y=0 then 1 else x**y fi end;

n:=3; A:=matrix(n,n,(i,j)->f(1-j,1-i));

b:=vector(n, i->1/i);

linsolve(A,b);