Dears,

Consider the problem min{|a+2*i| : i integer}, where a is a number of the form 2^k*t for a fixed integer k>1 and t in [0,1]. A simple checking shows that i must belongs to the interval [-(1+a)/2,(1-a)/2] and as the legth of this interval is 1, there is two integers in this interval.

How can I compute this integer i with Maple? The commad "ceil" not seem very suitable. Some idea?
Many thanks in advance for your comments.

At the beginning of my work sheet I used the matrix palette to create several matrix. Now when I try to use the palette this is what I get. 

`Matrix(2, 3, {(1, 1) = Typesetting:-msub(Typesetting:-mi("n"), Typesetting:-mrow(Typesetting:-mn("1"), Typesetting:-mo(","), Typesetting:-mn("1"))), (1, 2) = Typesetting:-msub(Typesetting:-mi("n"), Typesetting:-mrow(Typesetting:-mn("1"), Typesetting:-mo(","), Typesetting:-mn("2"))), (1, 3) = Typesetting:-msub(Typesetting:-mi("n"), Typesetting:-mrow(Typesetting:-mn("1"), Typesetting:-mo(","), Typesetting:-mn("3"))), (2, 1) = Typesetting:-msub(Typesetting:-mi("n"), Typesetting:-mrow(Typesetting:-mn("2"), Typesetting:-mo(","), Typesetting:-mn("1"))), (2, 2) = Typesetting:-msub(Typesetting:-mi("n"), Typesetting:-mrow(Typesetting:-mn("2"), Typesetting:-mo(","), Typesetting:-mn("2"))), (2, 3) = Typesetting:-msub(Typesetting:-mi("n"), Typesetting:-mrow(Typesetting:-mn("2"), Typesetting:-mo(","), Typesetting:-mn("3")))})`

To get a matrix from the palette I have to create it on a new worksheet and cut and past it into the existing work sheet.

What is happening?

Hi, I am a Maple newbie. My problem is I do not know how to generate the result to find the answers of these question: 

1. a)   Sketch the surface area of the part of paraboloid z = x² + y² that lies under the plane z=8.

b)   Compute the surface area.

2. a)   Sketch the solid that lies above the cone z = (x² + y²)^1/2 and inside the sphere x² + y² + z² = 16.

b)   Compute the volume of the solid.

It is possible to calculate these question? Does anyone has a suggestion? Thank you. 

Hi all,

Please help me to get a solution for all the desired data in the attached file. As you could see through it, just for 4 out of 20 desired Br, there are answers by the command:
Notice that If I write Br= -7.0 there is no solution, but I wrote Br= -6.999999, and the solution was achieved simply; just by applying an approximation value for '7'.
 

I don't know why for other data there are no solution...

Best

System_of_Equations.mw

how to see all steps of solution in maple? for eg: any second order differential eq.

how to solve optimal system of vector   fields in lie theory in maple?

Am trying to draw a series of triangles for animation.  I try to construct the triangles in a loop using:

triangle(cat(T1,`a`),[A,B,C]):

  so that the names of the triangles are meant to beT14, T15, T16

I have tried unsuccessfully to use the plots and draw commands ie

draw({seq(tabl[i], i=4..6)}, insequence=true, scaling=constrained);

plots[display({seq(tabl[i], i=4..6)}, insequence=true, scaling=constrained);

  Can the animation be done in either?  

It seems to want a variable in a list/set format - How do I set that up?  Any comments, or help gratefully received.  The program is below.  Part of the output does give triangles - but they all seem identical:-(

restart:

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

# Altitude exploration  program

#Trying to draw a sequence of triangles for animation

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

with(plots):

with(geometry):

for a from 4 to 6 do

b:=a+1: c:=a+2:

angA:=arccos((a+5)/2/(a+2));

point(A,0,0),point(B,c*cos(angA),c*sin(angA)),point(C,a+1,0):

tabl[a]:=triangle(cat(T1,`a`),[A,B,C]):

printf("a=%d\n",a);

triangle(cat(T1,`a`),[A,B,C]):

end do:
 

for i from 4 to 6 do

draw({seq(tabl[i], i=4..6)}, scaling=constrained);

printf("a=%d\n",i);

end do;
 

print(`After do`);

draw({seq(tabl[i], i=4..6)}, insequence=true, scaling=constrained);

Warning, the name changecoords has been redefined

Warning, the name arrow has been redefined

Warning, these names have been redefined: circle, ellipse, homothety, hyperbola, line, point

a=4

a=5

a=6

a=4

a=5

a=6

What is a suitable replacement for eliminate?

Here is my code:

In the older versions of Maple the first example of eliminate would return same result as the solve example, but with current version I need to resort to the second example.

Maple 13:

t:=(a0+a1*x+a2*x^2)/(b0+b1*x+b2*x^2);
t*exp(t)=c;

x=solve(%,x); yields with c<>0:

x=-(a0*b2-b0*a2)/(a1*b2-b1*a2)

Is this an error? The solution is the same in each case - it is independent of c. I would expect x as solution of t=LambertW(c).

Mathematica 7.0 says correctly: "The equations appear to involve the variables to be solved for in an essentially non-algebraic way."

Is this bug corrected in higher versions of Maple?

Hello, I have been attempting to plot a sequence of arrows in order to display how the vectors of the Frenet-Serret frame change throughout an helix-like trajectory. I came up with the following:

(With p1 being a plot I made earlier)

for t from 0 by 0.1e-1 to 12.5663706144 do plots[display](p1, plottools[arrow](Vector([cos(t), sin(t), t/(7.5)]), Vector([-(1/2)*sqrt(2)*sin(t), (1/2)*sqrt(2)*cos(t), (1/2)*sqrt(2)]), .1, .2, .3, cylindrical_arrow)) end do

This plots the desired arrow representing the tangent vector; however, it creates a plot for each step, while what I want is for it to display the arrow on each step in the same plot (as an animation).

I have attempted using the seq command, but I can't seem to get it right.

plots[display](p1, plottools[arrow](seq([Vector([cos(t), sin(t), t/(7.5)]), Vector([-(1/2)*sqrt(2)*sin(t), (1/2)*sqrt(2)*cos(t), (1/2)*sqrt(2)]), .1, .2, .3, cylindrical_arrow], t = 0 .. 4*Pi, 0.1e-1)))

With this code, the sequence won't be able to be executed.

Any ideas on how to do this? How can I use the sequence command in combination with plottools[arrow]?

Dear Guys

I want to solve this integral by maple:

p := sqrt(ln(t)*(ln(t))^(-2))*t^(-1)*(1-(ln(t))^(2)/(t^2))^(-1/4);

I used these expressions, but they don't work:

int(p, t);

int(simplify(p),t);

int(simplify(p, symbolic), t);

Could you please guide me?

Thanks

Hi,

I asked a question before, how to shift subscript of u(i,j):

P: u[i,j] -->  u[i+1,j]

https://www.mapleprimes.com/questions/223136-How-To-Define-An-Operator

How about an arbitrary expression?

P: u[i,j]^2 v[i,j]+u[i-1,j]  -->  u[i+1,j]^2 v[i,j]+u[i,j]

thanks.

See below, why the difference + what is the distinction between the 2?  Notice that they yield different results with the is command.

Download sum_versus_Sum.mw

where i can change the value?