@acer 

On tool bar, there are two icons (1) Animation speed (2) Scale plot axes, see attached figure.

Can we control these two using programing code?

@acer 

Thanks for the explaination.

@acer 

Thanks for the solution.

Could you please explain, why I can't use array like P[i]?

Is there any advanced Tutorial or book to study for graphics?

@acer 

I am trying to modify above code, but throwing error

Error, (in P[1]) invalid subscript selector.

Please check attached worksheet.

Download objects.mw

@acer 

Thanks it works. Now for more understaing I have few questions:

(1) What is the meaning of remember table in your comments? Could you please give me insight?

(2) I want to make this code more generic. i.e. I don't want to limit this code for 3 pieces, but it could be any number. If I read data from a file (r and z values), Is it possible to store functions as arrays such as:

f[i]:-Z->plot3d(-----); then use like f[i](value);

(3) How would I handle h function in a loop for any number of pieces?

(4) What is the meaning fA(5):=fA(5)? both sides are same.... what is happening here?

Thanks and appreciate your help in this problem.

@acer 

I am running your code from downloaded file, but it is giving me errors such as:

Error, (in plot3d) at least three arguments are required
Error, (in plots:-display) expecting plot structure but received: S
Error, (in plots/animate) at least three arguments are required

I observed, these errors are coming after

S := CodeTools:-Usage( seq( h(t), t=0..20, 0.5 ) ):

op([1,0],K);

op([1,0], A);

I am using Maple 17.

@acer 

Thanks alot. I was exactly looking like this. I will try tomorrow moring on my object and lets see how it works. I really apprecita of your reply, without your help it wasn't possible to comeup with this solution.

Now is it possible to save animation as video file or something like this? For presentation purpose, I would not be able to access maple remotely.

Good night.

@acer 

Definitely I misunderstood. Could you please write an example based on above plots A, B and C?

@acer 

Thanks fo rthe reply.

Your technique works, but  it animates five different shapes in five frames. That does not look nice.

In my senario, I divided my object into five different parts. I used plot3d command and created five graphs. Then combined these five graphs and created a object. For presentation purpose I want to display my object like real time visualization. For example look at the object (given below) that was made up of three graphs. I want to animate this object from z=0 to z=20 but slowly.

From one of my previous post posted by Kitonum:

A := plot3d([2*cos(phi), 2*sin(phi), z], z = 0 .. 5, phi = 0 .. 2*Pi):

B := plot3d([8*cos(phi), 8*sin(phi), z], z = 10 .. 20, phi = 0 .. 2*Pi):

C := plot3d([(2+6*((z-5)*(1/5)))*cos(phi), (2+6*((z-5)*(1/5)))*sin(phi), z], z = 5 .. 10, phi = 0 .. 2*Pi):

plots[display](A, B, C, axes = normal, scaling = constrained);

@nMaple 

Thanks to everyone. I solved the problem.

I got answer in another post.

Thanks for reading.

@Kitonum 

Thanks.

When I run it also displays

P1:=PLOT3d(...)

P2:=PLOT3d(...)

P3:=PLOT3d(...)

P4:=PLOT3d(...)

P5:=PLOT3d(...)

how can I supress appearing these? I am using : operator, but still getting same thing.

@Kitonum 

I can read data, but I don't know how to plot? These are five sets and would like to know how to merge all these plots and display as one plot. Right now it is displaying five separate plots. I am using the following code, where f(......) is used to calculate the radius.

@Kitonum Thanks.

I was able to draw my picture. I have few more questions,

(1) I have a text file containg the radius and z-value. How can I read data from a file and draw the picture?

My text file contains r1, r2, z1 and z2; where r1 is radius at z1 and r2 is radius at z2. For example,

r1-r2-z1-z2

2 2 0 5

2 6 5 10

6 6 10 20

6 3 20 25

3 3 25 30

(2) How can I make this animated plot?

Thanks for helping.

@acer Thanks, I figured out both questions.