Hello,

When you export a mw maplet file ****.mw  to a ****.maplet file, and when you launch this file ****.maplet with mapletviewer.exe, the following message appears at start: "Error launching maplet splash screen".

Kind regards,

ALS

Hi,

I'm writing an animation of the Spiral of Theodorus. I'm trying to get it to display a composition of the triangles as it animates. If i change the code to insequence=false it displays them all at once, and doesn't animate. Here is the little bit of code I wrote:

 

g := sum(arctan(1/sqrt(n)), n = 1 .. i)

p := seq(plots[polygonplot]([[0, 0], [sqrt(k+1)*cos(subs(i = k, g)), sqrt(k+1)*sin(subs(i = k, g))], [sqrt(k)*cos(subs(i = k-1, g)), sqrt(k)*sin(subs(i = k-1, g))]], color = white), k = 1 .. 16); plots[display]([p], insequence = true);

HI, URGENT! pls help.

the monster is

f := int(x^2/(e^x-1), x = y .. infinity);

y is some finite positive number. My goal is to plot f against y

I've tried to use either evalf or ApproximateInt to get a number but failed. The error msg either says object is too big or maple can't allocate enough resource.

pls help!

Hi everybody

I want to plot the piecewise function:

f(x)={ -1<=x<=0,-1<=y<=0,  x+y

0<x>1, 0< y <1, 3xy

I write en maple:

k := proc (x, y) if -1 <= x and x <= 0 and -1 <= y and y <= 0 then x^2+y^2 else if 0 <= x and x <= 1 and 0 <= y and y <= 1 then 3*x*y end if end if end proc;

with(plots):

plot3d(k, x = -1 .. 1, y = -1 .. 1);

the PC's send me this message:

I got this code in Maple >restart: lambda[1] := 3; lambda[2] := 4; lambda[3] := 5; lambda[s] := lambda[1]+lambda[2]+lambda[3]; u := 20; deltat:= 1; c:=1; Q:=10; >MultivariateNormalSample := proc (Sigma, N) local A, R, d; d := LinearAlgebra[RowDimension](Sigma); R := Matrix(LinearAlgebra[LUDecomposition](evalf(Sigma), 'method' = 'Cholesky'), datatype = float[8]); A := Statistics[Sample](Normal(0, 1), d*N); A := ArrayTools[Alias](A, [1 .. d, 1 .. N]); rtable_options(A, subtype = Matrix); return R.A; end proc; >with(Statistics): U:=u;

Hello! I have been learning Maple recently. My teacher gave me the task to simulate the kinematics of heart ventricles with subsequent calculation of their volume.

Hi everyone.

I have a loop in which initial data of ODE is found on every iteration and is substituted to find new solution. The system is striking 1 or -1 and x'(t) changes its sign, to -x'(t)

I do it this way (k[i] stands for the values of time t):

Hi everyone.

I have a loop in which initial data of ODE is found on every iteration and is substituted to find new solution. The system is striking 1 or -1 and x'(t) changes its sign, to -x'(t)

I do it this way (k[i] stands for the values of time t):

Is there a way to display a table of all variables (name, type, dimensions), that I defined in my worksheets. Something like the workspace in MATLAB. Maybe also to edit the values in a fast way.

 

How do I change the dimension of the Visualization?

Imagine a simple pendulum

:

In the construction mode it looks like this:

But if I change the length of the RBF from 1 meter to 1cm it looks like this:

Hi, can anyone point out what I've done wrong in setting up this PDE solution: PDE:=diff(u(x,t),t$2)+diff(u(x,t),t)-diff(u(x,t),x$2)=sin(Pi*x/l); BCs:=u(0,t)=0,u(l,t)=0; ICs:=u(x,0)=0,D[2](u)(x,0)=0; ans := pdsolve([PDE,BCs,ICs],u(x,t)) assuming l

Hi colleagues,
How to determine if a point belongs to a plane, considering the uncertainties of the coordinates of the point?
I'm stuck in this task. I remember seeing a taks that makes this task, but does not take into account uncertainties;
Gracias
 

How can I have a 3d plot rotate? 

 

Hello. There is a random value X with normal distribution and there is a function f=e^(r*X). So how can I get a variance for f? I'm doing T := Distribution(PDF = (proc (x) options operator, arrow; e^(r*piecewise(x

Am I using map correctly here?  And is this a good way to vary the size of points for a set of data?

a:=[[1,1,1],[2,2,1],[3,4,4.5],[2,1,2.4]]

b:=map(a->[a[1],a[2]],a)

c:=ListTools[Flatten](map(a->[a[3]],a))

d:=seq(pointplot(b[i],symbolsize=c[i]*10),i=1..nops(b))

display(d);