Items tagged with maple maple Tagged Items Feed

In this section, we will consider several linear dynamical systems in which each mathematical model is a differential equation of second order with constant coefficients with initial conditions specifi ed in a time that we take as t = t0.

All in maple.

(in spanish)




Compared to Maple on Windows, how do ppl like Maple on Macs ?

Any comments ??


Thanks, cheers !


OK, what am I doing wrong here?

This polynomial can be factored by almost anyone who knows algebra:


but Maple refuses:

 x2  + y2  + 2 xy

but if I pose the question this way:

ans := expand((x+y)^2);


(x + y)2

I get the expected result.  What is wrong with how I am using the factor?


I am new to maple. I want to write the following codes in Maple in a file and execute it. I am writing the code in matlab. thanks


for i =1:1:5

for j=1:1:5






The equations of motion for a rigid body can be obtained from the principles governing the motion of a particle system. Now we will solve with Maple.

(in spanish)


Lenin Araujo Castillo

Corrección ejercico 4


4.- Cada una de las barras mostradas tiene una longitud de 1 m y una masa de 2 kg. Ambas giran en el plano horizontal. La barra AB gira con una velocidad angular constante de 4 rad/s en sentido contrario al de las manecillas del reloj. En el instante mostrado, la barra BC gira a 6 rad/s en sentido contrario al de las manecillas del reloj. ¿Cuál es la aceleración angular de la barra BC?


restart; with(VectorCalculus)



m := 2

L := 1

theta := (1/4)*Pi

a[G] = x*alpha[BC]*r[G/B]-omega[BC]^2*r[G/B]+a[B]NULL


a[B] = x*alpha[AB]*r[B/A]-omega[AB]^2*r[B/A]+a[A]


aA := `<,>`(0, 0, 0)

`&alpha;AB` := `<,>`(0, 0, 0)

rBrA := `<,>`(1, 0, 0)

`&omega;AB` := `<,>`(0, 0, 4)

aB := aA+`&x`(`&alpha;AB`, rBrA)-4^2*rBrA

Vector[column](%id = 4411990810)


`&alpha;BC` := `<,>`(0, 0, `&alpha;bc`)

rGrB := `<,>`(.5*cos((1/4)*Pi), -.5*sin((1/4)*Pi), 0)

aG := evalf(aB+`&x`(`&alpha;BC`, rGrB)-6^2*rGrB, 5)

Vector[column](%id = 4412052178)


usando "(&sum;)M[G]=r[BC] x F[xy]"

rBC := `<,>`(.5*cos((1/4)*Pi), -.5*sin((1/4)*Pi), 0)

Fxy := `<,>`(Fx, -Fy, 0)


`&x`(rBC, Fxy) = (1/12*2)*1^2*`&alpha;bc`

(.2500000000*sqrt(2)*(-.70710*`&alpha;bc`-25.456)+(.2500000000*(57.456-.70710*`&alpha;bc`))*sqrt(2))*e[z] = (1/6)*`&alpha;bc`



"(&sum;)Fx:-Fx=m*ax"           y             "(&sum;)Fy:Fy=m*ay"

ax := -28.728+.35355*`&alpha;bc`



ay := .35355*`&alpha;bc`+12.728



Fx := -2*ax



Fy := 2*ay



`&x`(rBC, Fxy) = (1/12*2)*1^2*`&alpha;bc`

(.2500000000*sqrt(2)*(-.70710*`&alpha;bc`-25.456)+(.2500000000*(57.456-.70710*`&alpha;bc`))*sqrt(2))*e[z] = (1/6)*`&alpha;bc`


.2500000000*sqrt(2)*(-.70710*`&alpha;bc`-25.456)+(.2500000000*(57.456-.70710*`&alpha;bc`))*sqrt(2) = (1/6)*`&alpha;bc`

.2500000000*2^(1/2)*(-.70710*`&alpha;bc`-25.456)+(14.36400000-.1767750000*`&alpha;bc`)*2^(1/2) = (1/6)*`&alpha;bc`



[[`&alpha;bc` = 16.97068481]]





Matlab seems to be pretty strong at doing color plots with separate color bars, e.g.

Is this also possible in Maple and somehow in combination with `plots[surfdata](...,color=zhue,...)`?

I have a nice family of functions of the form:

W:=(p,n,mu,w)->sum(w[k] * (n-k)* mu(n-k),k=1..n)

which can be evaluated for different p's using the operator mu*diff(...,mu)

The recursion begins with p=0 and proceeds using mu*diff(W(p,n,mu,w),mu) = W(p+1,n,mu,w).

Can anybody implement this procedure in Maple

Thank you 

The precise definition is that the distance between any two points of the rigid body remains constant. Although any body is deformed to move, if the deformation is small movement can be approximated by modeling it as a rigid body. Now let's see how Maple is part of the solution.

(in spanish)


Lenin Araujo C.




Hello fellow members. I recently got a new laptop, and installed Maple of course. Everything went smoothly until I attempted to approximate an answer.

I got the error message:

"[5] Error, invalid input: expected evalf[] index to be of type posint but received %ARG1"

Approximation works perfectly on my other computer and old laptop.

Any help?

Hey Everyone:

I was wondering what are your favorite and most useful code snippets that you often use. Maybe ones that are in your initialization code? Maybe ones that speed up something that you often do in maple? Maybe ones that you've seen on this and other websites and adopted for your own purposes?

For fun, I attach my init.mpl (.txt here, as .mpl attachments are not allowed by mapleprimes) here init.txt

Some of the snippets that I use the most are also listed below:

#rearrange curves inside an already created plot, so that certain curves are "on top" of the other ones.
#discussed here:
rearrangeCurves:= proc(
     v_items::specfunc(anything, PLOT),
     v_reorder::list([integer,integer]):= []
local p, curves, rest;
     (curves,rest):= selectremove(type, v_items, specfunc(anything, CURVES));
     curves:= < op(curves) >:         
     for p in v_reorder do
          curves[p]:= curves[p[[2,1]]]
     end do;
     PLOT(convert(curves,list)[], op(rest))
end proc:

#for numerical differentiation
#based on the idea from:
#example use:
#alist:=[seq(i, i=0..10, 0.1)]:
#data:=map(x->evalf(sin(x)), alist):
#plot(alist, data);
#plot([cos(x), 'num_diff(x, LinearAlgebra:-Transpose(Matrix([alist,data])))'], x=1..10, thickness=5, linestyle=[solid, dot], color=[blue, red]);
num_diff:=proc(x, v_data, v_options:=[method=spline, degree=3])
 #v_data is a matrix
 #TODO: let the data be in a more arbitrary format that ArrayInterpolation understands, but keep x as first var
 evalf(D[1](x->CurveFitting:-ArrayInterpolation(v_data, [x],v_options[])[])(x));

#extract nth columns/rows from a matrix
#these only work if have a 2d object... should be updated to also work
#with 1d row/column vectors
#Example use cases
#A := LinearAlgebra:-RandomMatrix(20, 20, outputoptions = [datatype = float[8]]);
#nthColumns(A, 2); #Every other column
#nthRows(A, 10)[.., 1..3]; #Every 10th row, but show only first 3 columns
nthColumns:=proc(v_m, v_n)
  v_m[..,[seq(i, i=1..rtable_size(v_m)[2], v_n)]]
nthRows:=proc(v_m, v_n)
  v_m[[seq(i, i=1..rtable_size(v_m)[1], v_n)],..]

#saves a png plot
savePlot:=proc(v_p, v_fileName, v_w:="800", v_h:="500")
    plotsetup("png", plotoutput=v_fileName, plotoptions=cat("quality=100,portrait,noborder,width=",v_w,",height=",v_h));


we always have subscript variable in the math book, but how could this be natral done in maple

I want to get a seq aaa3


but how could I get a  aij



seq(a[ij],i=1..3);  both was not right

I'm trying to solve some ODE analitically. But Maple gives me an incorrect solution. What am I doing wrong? Thank you.


I recently bought Maple 18 and noticed it was very unpleasant to look at. I saw it was running in low resolution on my Macbook Pro Retina late 2014. Why can I not untick it? This is not acceptable for the price I paid, and the fact I can't get my money back.

Any help would be highly appreciated.

Hi, I installed Maple 17 a while back and was able to work all the commands but recently I reinstalled it
I tried a command which gave me an error that I never got before


Error, (in Student:-Calculus1:-RiemannSum) external linking: error loading external library statshw.dll: The application has failed to start because its side-by-side configuration is incorrect. Please see the application event log or use the command-line sxstrace.exe tool for more detail.

When I tried to reinstall the only issue was that it had trouble installing Visual C++ 2005 redistribute however I already have it on my computer and I don't intend to uninstall it since it took a long time to actually get my other programs to have it working. Is there anyhting I can do to fix this error? (Plotting other stuff seems to work fine except for Riemann Sums)

We are happy to announce the first results of a partnership between Maplesoft and the University of Waterloo to provide effective, engaging online education for technical courses.

Combining rich course materials developed by the University with Maple T.A. and Maplesoft technology for developing, managing, and displaying dynamic content, the Secondary School Courseware project supports high school students and teachers from around the world in their Precalculus and Calculus courses. The site includes interactive investigations, videos, and self-assessment questions that provide immediate feedback.

Feel free to take a look. The site is free, and no login is required.  

For more information about the project, see Online Mathematical Courseware.


4 5 6 7 8 9 10 Last Page 6 of 271