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.

 

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);

                               

 

Hello

Please answer my question about my math lab class.

when I solve the equation about "     cos(2*theta)=1/2       "   by   " solve(cos(2*theta)=1/2,theta);"

I just get the answer "Pi/6" only

but I want the all root within "0 to 2*Pi"

How can I get the all root by limitting area of root??

One thing I am struggling to understand is the following:

If you have three randomvariables (similarities to the hat puzzle) then you
can get a positive expected value if you for example bet that r1 will be negative
when r2>0 and r3>0 and that r1 will be positive when r2<0 and r3<0. It follows
because the probability of getting [+,+,+] + [-.-.-] = 0.5^3+0.5^3=0.25. Which
means that the probability of success for our introduced betting strategy is 0.75.

Please would you help me how to make an animation of nonlinear waves, in other words, animation of solitons with Maple

 

I have a student who wants to compute points and add the points to a displayed graph as they are computed, without having new axes and a new graph created as additional points are added to the list. Something like an animation, but slightly different in its effect.

For example, suppose that 100 points will eventually be computed, but one wants the first seven points to be displayed even before the eighth is computed, and certainly long before the 100th point is computed.

How do I show the 126 different permutations of tic tac toe?