Advanced Search

Question: How to the create 3D animation of rotating 2D function plot

Question:How to the create 3D animation of rotating 2D function plot

Chia 155 Maple
plot animate 3d
June 01 2015
0

Hi all,

 

I'm trying to create the 3D animation which can show the idea of rotating 2D function plot, such as:

 

with(plots):

display(seq(surfdata([seq([seq([x, cos(2*p*Pi*(1/25))*x^(1/2), -sin(2*p*Pi*(1/25))*x^(1/2)], x = 0 .. 4, .1)], p = 0 .. t)]), t = 1 .. 25), insequence = true);

But it's too inconvenient because of too many seq functions in this commond, is there any easier way to plot this animatiton?

Thank you.
Please Wait...