I've got the following 

with(plots):
tubeplot([cos(t),sin(t),t], t=0..6*Pi, radius=1/3,
style=patchnogrid, shading=Z, axes=box, orientation=[40,70]);

which gives the plot of a spiral and need to make an animation of a rotating spiral.

I've tried 

animate([cos(t),sin(t),t], t=0..6*Pi,numpoints=200,frames=20,shading=Z,axes=box) but that doesn't work. What am I doing incorrectly?

Hi, Very new to Maple. This is a math assignment, and well I am not exactly sure what is happening. I have had a buddy to help me, but things are not necessarily working. Using Maple17.
This is what I have so far.

de := sin(x)*(diff(y(x), x))+cos(x)*y(x) = Q;
/ d \
sin(x) |--- y(x)| + cos(x) y(x) = Q
\ dx /
dsolve(de);
Q x + _C1
y(x) = ---------
sin(x)
ab := 75; Q := 2-0.1e-1*ab; M := 4+0.1e-1*ab;
75
1.25
4.75
PS := simplify(dsolve({de, y((1/2)*Pi) = M}, y(x)));
-10 x - 38 + 5 Pi
y(x) = - -----------------
8 sin(x)
z := rhs(PS);
-10 x - 38 + 5 Pi
- -----------------
8 sin(x)
N := evalf(subs(x = .4, z));
8.439521805
a := z, x = 0 .. Pi, y = 0 .. 10; b := plots[pointplot]([(1/2)*Pi, M]); c := plots[pointplot]([.4, N]); d := plots[pointplot]([x0, y0]); plots[display]({a, b, c, d});
z, x = 0 .. Pi, y = 0 .. 10
Error, (in plots:-pointplot) points cannot be converted to floating-point values
Error, (in plots:-pointplot) points cannot be converted to floating-point values
Error, (in plots:-pointplot) points cannot be converted to floating-point values
Error, (in plots:-display) expecting plot structures but received: {c, d, z, plots:-pointplot, x = 0 .. Pi, y = 0 .. 10}

The regular plot3d command takes in the range of x and y but if I have been asked to "choose a range of z to get a nice picture" what command can I use apart from implicitplot3d, which in this case doesn't seem appropriate?

I've got the following code:

with(plots):
a:=seq(combinat[fibonacci](k), k=2..10);
for i from 1 to 5 do
#with(plots):
multiple(plot,[sin(a[i]*x),x=-2..2,-2..2,color="Red",legend=typeset("Curve1:",sin(a[i]*x))],[sin(a[i+1]*x),x=-2..2,-2..2,color="Green",legend=typeset("Curve2:",sin(a[i+1]*x))],title=typeset("Lissajous",i));
end do;

that plots the sine functions of consecutive fibonacci numbers pairwise. Now, if I had to use the display command to plot these pairs together, how would I be able to do so?

I wish to recalculate the document from the beginning (or from the last restart) without having to select everything and push the "!" button.

Hello everybody,

I guess my problem is a very little one, but I don't have any idea how to solve the following equation:

The equation is defined as follows:

gl1 := a = (arctan(b^2/(z*sqrt(b^2+b^2+z^2)))+b^2*z*(1/(z^2+b^2)+1/(z^2+b^2))/sqrt(b^2+b^2+z^2))/(2*pi);
                                       
z := solve(gl1, z);

Warning, solutions may have been lost

Does anybody of you have an idea how to solve this problem?

Thanks so much in advance!

I'm a calulus 1 student, using Maple to help write my homework assignments. I came across this problem I'm having with Maple 18.

I'm working on explaining analytically where the veriticle asymptotes occur on f(x) = cos*x/(x^2+2*x);

I get all of it done, and at the end I want to insert a plot of this function to finish my disussion.

This is very surprising to see Maple behave this way. What am I doing wrong? Or why is Maple not plotting a simple graph accuratly??

   Hi, there

Hoe can we plot the floor function by Maple13? I used plot command and implicitplot command. But the output was wrong on integer values.

Thanks for your help

Yegan

Hi everyone,

I've been having a problem with this question:

"The system of cities and roads in Connected Graphs on page 246 splits naturally into two components: the Canadian cities and roads between them, and the European cities and roads between them. In each component you can travel between any two cities, but you cannot travel between the two components. Write a procedure that, given a table of neighbors, splits the system into such components. Hint : Think about the form in which the procedure returns its result."

I have to separate a table into two tables based on the connectivity of the cities, that is, I want a table just for the cities from Canada and another one for the cities from Europe. Can anyone help me with this? I really have no idea how to tell Maple what I want it to do.

Anyway, here's the link with the soon-to-be program:

6.9.mw

Hello,

I need help on plotting in for loop.

> N := 10; h := 1/N;
> for i from 0 to 10 do x[i] := i*h; p1 := evalf(cos(x[i])) end do;
> f1 := [seq([x[i], p1], i = 1 .. N)];
> plot([cos(x), f1], x = 0 .. 1, y = 0 .. 1);

The above code gives me  cos x plot and line plot, but I want plot of points and cos x.

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?

I need to apply the midpoint method to an initial value problem. Heres my code:

>mp := proc (f, a, b, N)
local x, k1, k2, y, i, h;
y := array(0 .. N); k1 := array(0 .. N); k2 := array(0 .. N); x := array(0 .. N);
h := evalf(b-a)/N;
x[0] := 0; y[0] := .85;

k1[0] := h*f(0, .85);

k2[0] := h*f(0, .85+.5*k1[0]);

from i = 1 to N do

x[i] := x[i-1]+h;

k1[i] := h*f(0, y[i]);

k2[i] := h*f(0, y[i]+.5*k1[i]);
y[i] := y[i-1]+k2[i-1];
print(x[i], y[i]) end do
end proc

>f := (x,y)-> 1.3/(1+y^2);

>mp(f,0,1,10);

But i get an error message saying "Error, (in mp) initial value in for loop must be numeric or character"

Hello friends;

I want to solve 3 - second orger equations with  6 unkowns. 

When i say just dsolve without boundry conditions it is solving but so complicated. 

_C6Ci  it is giving like that which i dont know the meaning of Ci.

But with boundry conditions it is not solving .

May you help me please where i am doing wrong. I downloaded the file.

Thanks.

Curvedbeam_static_variablethickness_analitik4.mw

Dear All，

I solve an equation  as follows,

m:=dsolve({T(0) = 300, diff(T(t), t) = (min(G1, G2)-Loss)*(1/35513)}, T(t), numeric)

G1,G2, and Loss are functions of T and G1 and Loss are tangent at point A where T=600, when I　want to plot the dsolve solution by odeplot,like this

odeplot(m, [t, T(t)], 0 .. 800)]

I got a curve whose maximum value  is  600( equal to the tangent value) and actually the value should increase after passing the tangent point, Who can tell me where is the problem. Thanks.

Hello everybody!

My name is Mathew and I am a new member of this forum, and this is my first post, so please be lenient towards me:) I wanted to ask for help since my adventure with Maple 18 was supposed to start yesterday, unfortunately I encountered a problem I couldn't solve myself so far- my Maple 18 does not integrate. At all. It has no problem with differentiating, adding, subtracting and such, unfortunately any type of integral is unsolvable by Maple. I tried typing the easiest functions, such as e^2xdx under the integral, unfortunately it is met with following message:

Error, (in int) wrong number (or type) of arguments: invalid option value passed to indefinite integration: {}.

I understood from several tutorials on the internet that this program should not have any problems with dealing with such form of formulas. What could be wrong? How to make  it work as it is supposed to?

Please help me. As I mentioned in the beginning, I am a new member, so in case I did something wrong or placed this post in wrong category- please forgive me;)