I would like to pay attention to the article "Words and More Words" by Joseph Malkevitch. Here are a few  intriguing references:

M. Morse, A solution of the problem of infinite play in chess, Bull. Am. Math. Soc., 44 (1938) 632.

M. Morse and G. Hedlund, Symbolic dynamics, Am. J. Math. 60, (1938) 815–866.

Lothaire, M. Applied Combinatorics on Words, Cambridge U. Press, New York, 2005.

I have a monomial in 8 letters j_0, j_1, j_3, j_4, j_6, j_10, j_11, j_15 with corresponding exponents b_0, b_1, b_3, b_4, b_6, b_10, b_11, b_15. I would like Maple to calculate 0*b_0 + 1*b_1 +3*b_3 +...15*b_15. I know indets returns a list of the variables, but I am not sure how to pull off the indices and exponents? Thank you very much for the help!

https://www.facebook.com/pages/Matemática-Computacional-Trujillo/145132492343285

When I run "sum(a[1/k],k=1..n);", I get "Error, (in IntegerSub) too many levels of recursion". But it's OK to run "product(a[1/k],k=1..n);". Furthermore "Error, (in IntegerSub) too many levels of recursion" cannot be caught.

Jeff

In a box we have cards number and

Let . Find ?

Hi,

How would I ask Maple to display a expression and then evaluate it?

For example

Diff(5,x)=value(Diff(5,x));

or

Diff(5,x)=diff(5,x);

But do I really have to copy the lhs to do rhs every time?

Any simpler way?

PS: I am using 1-D input and I'd like to keep it that way.

Hi.
I am trying to use a new Physics:-Library:-SortProducts command. However it doesn't work in my case.

restart; 
with(Physics); 
with(Library); 
Setup(mathematicalnotation = true); 
Physics:-Setup(anticommutativeprefix = psi); 

for i to 4 do 
ap[i] := Creation(psi, i, notation = explicit); 
am[i] := Annihilation(psi, i, notation = explicit) 
end do; 

z := A*ap[2].am[2].ap[1].am[1]+B*ap[1].am[1].ap[2].am[2]+C*ap[3].am[3].ap[4].am[4]:

Solve the following system of equations

The solution to the following differential equations results in empty brackets [] and I want to know their content

> Restart; ode := B*(x-1)^2*(diff(y(x), x, x))+C*(x-1)*(diff(y(x), x))+(A-x/(x-1))*y(x) = 0;


> dsolve(ode);

y(x) = _C1*(x-1)^((1/2)*(-C+B-I*sqrt(-B^2+(2*C+4*A-4)*B-C^2))/B)*hypergeom([], [(B+I*sqrt(-B^2+(2*C+4*A-4)*B-C^2))/B], 1/(B*(x-1)))+_C2*(x-1)^((1/2)*(-C+B+I*sqrt(-B^2+(2*C+4*A-4)*B-C^2))/B)*hypergeom([], [(B-I*sqrt(-B^2+(2*C+4*A-4)*B-C^2))/B], 1/(B*(x-1)))

HERE IS A FUNCTION THAT I WANT TO DIFFERENTIATE

I've been wondering if this is possible and i'd be very happy if it is. Is there a way i can format the output of and fsolve(). in such a way that it does not come in curly braces, preferably, it comes out in a colomn-vector form and without the names of the variables solved for. Just the values. 

Secondly, I've been trying to apply the newtons method for my friend here in school but i've been getting an error message...

Let X be the random variable uniformly distributed in the disk centered at the origin O(0,0) with radius 1 and let Y be the random variable uniformly distributed in the square having its vertices A(6,-1), B(9,-2), C(8,-5), and E(5,-4). What is the PDF of the distance between X and Y? Is it possible to find that with Maple? The similar question in three dimensions, replacing a square by a cube and a disk by a solid sphere.

solve Differential Equation : y"+4y=sin2x.