I want to write a code to eliminate the noise in the data, but am unfamilar with how to do it.  This is the data:

bdata:=[[8,15],[0,18],[0,19],[-1,20],[-9,23],[0,19],[-2,20],[4,17],[-3,19,],[-1,20],[6,16],[6,17],[-2,20],[-8,23],[-2,19],[0,18],[-6,21],[-6,21],[7,16],[-9,22],[5,16],[-9,23],[-7,22],[-2,20],[4,17],[5,17],[-2,19],[-1,20],[-6,21],[5,16],[6,17],[2,17],[0,18],[5,16],[-2,20],[7,16],[-2,20],[1,18],[0,18],[-8,29],[-9,27],[-10,32],[-6,28],[7,11],[5,9],[8,7]]:

Hello all,

I have a singular square matrix E (12x12 with its rank of 10). I need to find 2 invertible matrices S and T such that S.E.T is a square diagonal matrix (in Smith Normal form). 

Using Maple with the following commands:
>Temp := SmithForm(E);
>Rank(Temp) 
Temp is a identity Matrix and Rank of (Temp)  is 12!!! or Rank of (S.E.T) = 12.

However, the determinant of E is less than 10^-29 and rank of E is 10.

We have just released a free collection of Maple and MapleSim classroom materials that helps bring modern technology to any introductory course in control design. This collection includes interactive classroom demonstrations that illustrate key concepts; lab projects and assignment questions; and example models ready to be explored.  It’s been designed primarily for instructors, but students should find much of it useful, too.

How to extract affine terms from a differential equation after linearization?

Vanderpol Eqn:

To be precise, I linearized...

My program is to compute the sequence of integrals of Jn = int(x^(2n)*sin(pi*x), x=0..1) for n=1...N to 10s.f where N=10.

This is my program but it keeps telling me it is missing an operator and I'm unsure why.

N:= 10:
In:= evalf(2/Pi):

for n from 0 by 1 to (N - 1) do

  In:=evalf((1/(Pi^2))*(Pi-((2n+1)*(2n+2)*In))):

   maple_In := evalf(Int((x^(2n))*sin(Pi*x), x = 0..1), 20):

   printf( "%d %10.10f %10.10f %10.10f \n" , n + 1 , In , maple_In , abs( In - maple_In ...

i use Infeld's The Factorization method and find this Hermit is type D. since not exactly match r i use R(x,m) = r(x,m) + f(m) and compare them, then find k = x but eigenfunction Y := C*exp(-int(x,x)); has constant C, range x should between negative infinity and infinity. C is 1/Pi^(1/4) after solved. i guess this is wrong, but i do not know where is wrong.

another problem is that i assume C = 1, after sum for generating function the solution is not the same as mentioned in book which is exp(2*x*z-z^2)...

Hi. Can anyone help me with getting all the prime numbers from 1 to 2000 in maple with "from 1 by 1 to 2000 do" and maybe use "if"? How do i make this?

Hello. It World be greate if you could ad a maple file viewer to the Maple Player for the IPad and similar products. It is a greate tool when you are on the move and do not have you pc with you to do the calculations on. I use Maple a lot at my studies at the university of southern denmark, at when I talk to my study mates about a problem, it would be greate to be able to open maple files from you pc on the ipad. I save my documents to my Dropbox, so I always have then nearby....

Can anyone help me draw this drawing in a plot? 

How to add markers to the plot?

like this (Mathcad)

http://hostingkartinok.com/show-image.php?id=463430d32fa17177980d7308df09ca2c

Can someone explain to me how I flush the memory build up that occurs as Maple keeps track of historical execution?

If I, for example, write a FOR loop that iterates a huge amount of times and don't include the colon after "end do", but rather use the semicolon, the memory usage keeps creeping up and then finally Maple just goes off into never land and never comes back.

I tried this in Windows and Mac OS X.  Same results.

I thought I could add an interface(historysize=?...

Hello all

I have a worksheet where I solve numerically a system of differential equations and define a lot of quantities based on the solution. Since I have to plot alot of stuff and make a lot of fits, the worsheet got cluttered and it's not so easy to find what I want anymore (besides, just running the entire thing takes A LONG time). So my question is, can I save the solution and the quantities I defined and use it as a "kernel" for other worksheets, so I can have...

testeq() gives inconsistent results. See this example:

Equation (1):

computes to

Equation

hey guys , my concern is about boundaries in random matrix or rtable. so, i can garantee that boundaries in  matrices are in 0 and 10, but i can´t impose a restriction  like the sum of row must be equal 10 for example.
help !! 

pop:=(10-0)*ArrayTools:-RandomArray(proc(A)
local i
if A::rtable[row] then 
seq(A(i),i=1..NumElems(A));
else
args
end if 
end proc(10,3))+0; 

Hello!

Maple 16 differs from Maple 15  (Linux, 64 bit )  in that the plots (both 2D and 3D) have all lines contoured in black.  

How to disable such new behaviour?