Maple 2016 Questions and Posts

These are Posts and Questions associated with the product, Maple 2016

How to improve menu speed in Maple 2016?

I am using Maple 2016, when I right click the equation, it really takes a long time to show the menu. It seems that the CPU usage and Memory usage is low, it should be fast as it is only a showing menu action, what's wrong with that?

The worksheet below rolls an ellipse along the y axis with constant energy.

How can the physics be enhanced to roll the ellipse along a non-linear curve (e.g. a sine curve) with constant energy?

EllipseRoll.mw

Help create file Excel in ExcelTools, but error row 564?

thu_file.mw

Please help me? 

Hello

I am looking for the table containing the value m,vv and mm. and these values I can easily copy and paste in excel sheet. 

Plz suggest commands 

 

Thanks Dummy_5.mw

The conditional trigger in the code below does not cause a halt although odeplot shows x dipping to a value below 2.

What is the correct coding of this event to cause a halt when x becomes less than 2?

Does any Maple documentation show examples of working discrete events with conditional triggers?

restart;

DE1 := diff(x(t), t, t) = -x(t)-(diff(x(t), t))+y(t);

DE2 := diff(y(t), t, t) = y(t)-(diff(y(t), t))+x(t);

ICs := x(0) = 2, (D(x))(0) = 1, y(0) = 0, (D(y))(0) = 1;

sol1 := dsolve({DE1, DE2, ICs}, {x(t), y(t)}, numeric, event_initial = true, events = [[[0, x(t) < 2], halt]]);

plots:-odeplot(sol1, [t, x(t)], t = 0 .. 3);
 

The animation in this worksheet seems realistic but I wonder if the physics which is implemented is correct since there is no explicit mention of rotational energy.

ThrowBola.mw

Hello,

this is my code:

######################

restart;
g(x,y):=min((3+((x-y)^(2))/(10)+(|x+y|)/(sqrt(2))),(-|x-y|+(7)/(sqrt(2))));


q:=0; h(x,y):=Heaviside(g(x,y)-q);

                               0
(x, y) -> Heaviside(g(x, y))

p := int(int(h(x, y)*exp((-x^2-y^2)*(1/2))/(2*Pi), y = -infinity .. infinity), x = -infinity .. infinity);

Error, (in unknown) too many levels of recursion

 

######################

I keep having this error message, is this integral impossible to process or is there someting wrong with the code?

 

 

 

 

with(plots);
for x to 10 do Disp[x] := plot([x+cos(a), sin(a), a = 0 .. 2*Pi], colorscheme = ["Red", "Green"]) end do;

display(seq(Disp[i], i = 1 .. x-1), insequence = true, scaling = constrained);
 

What coding in the color or colorscheme parameter in the plot command above would rotate the circle's colors in conjunction with the circle's movement along the x axis to give the appearance of a rolling wheel? 

how can I get a positive output in the following example

solve((hv*hw+lv*lw)/(lv+hv)*(lv+hv) = dw*(lv+hv), hv)

instead of -lv*(dw-lw)/(dw-hw) I would like lv*(dw-lw)/(hw-dw)

How can type 

[
 

"seq('op'('S['i'])',i=1..5)"

op(S[1]), op(S[2]), op(S[3]), op(S[4]), op(S[5])

(1)

into

into

(2)

op(S[1]), op(S[2]), op(S[3]), op(S[4]), op(S[5])

``

(3)

``


 

Download op_seq.mw

seq('op'('S['i'])',i=1..5)]

export

[op(S[1]), op(S[2],op(S[3],op(S[4])]

Please help me

When I try:

X≔Statistics[RandomVariable](Normal(0,1)):
Statistics[Sample](X,10);

I get:

Error, (in Statistics:-Sample) invalid input: expected distribution or algebraic expression with random variables, but received X

What am I doing wrong?

 

in maple, i can't use print? Help me. Please.

The third execution of procedure TP returns infinity but it has a real value in the integral's plot. Why is this?

Int_Question.mw

Good day everyone.

Please can help me with this code on the taylor series expansion involving Fractional Differential Equation (FDE)? Particularlly, the lines highlighted blue and green respectively in relation to FDE.

Thank you and kind regards

#k=2
restart:q:=n*h:
P:=sum((a[k]*x^(k))/GAMMA(k+1-alpha), k=0..3):
assume(alpha>0,alpha < 1):
Q:=fracdiff(P,x,alpha):
e1:=simplify(eval(P, x=q+h))=y[n+1]:
e2:=simplify(eval(Q,x=q))=f[n]:
e3:=simplify(eval(Q,x=q+h))=f[n+1]:
e4:=simplify(eval(Q,x=q+2*h))=f[n+2]:
var:=seq(a[i], i=0..3):
M:=e||(1..4):

Cc:=eval(<var>, solve(eval({M}),{var}) ):
for i from 1 to 4 do
	a[i-1]:=Cc[i]:
end do:
Cf:=P:
E:=collect(Cf, [y[n+1], f[n], f[n+1],f[n+2]], recursive):
print():
s2:=y[n+2]=simplify(eval(Cf, x=q+2*h)):
collect(%, [y[n+1], f[n], f[n+1],f[n+2]], recursive):

s1:=y[n]=simplify(eval(Cf, x=q)):
collect(%, [y[n+1], f[n], f[n+1],f[n+2]], recursive):

Y[n+1]:=convert(taylor(y(x+h),h=0,12),polynom):
F[n]:=convert(taylor((D(y))(x), h = 0,12), polynom):
F[n+1]:=convert(taylor((D(y))(x+h), h = 0,12), polynom):
F[n+2]:=convert(taylor((D(y))(x+2*h), h = 0,12), polynom):


W:=asympt(expand(eval(rhs(s2),[y[n+1]=Y[n+1],f[n]=F[n],f[n+1]=F[n+1],f[n+2]=F[n+2]])),h,6);
X:=convert(taylor(y(x+2*h),h=0,12),polynom)-W;
lte:=convert(asympt(X,h,8),polynom);

 

 

I am brand new to Maple Cloud and Maple Player.

I have uploaded two worksheets to the cloud, and my wife has just installed Maple Player on her laptop.

In Maple Player, the second worksheet shows the shareable symbol but the first doesn't even thought I uploaded both in the same way by clicking on the upload symbol in the Maple Cloud palette. Why is the first worksheet not shareable?

When my wife displays the second worksheet she is able to move its sliders but they do not change the display as they do when I move the sliders within Maple2016. How can she change the display?

Here is a link to the second worksheet:

Cassinian_oval.mw

1 2 3 4 5 6 7 Last Page 1 of 50