Message Boards Message Boards

Plot3D and animate a Surface?

GROUPS:

Hello and greetings from Sydney - Australia. Is there someone out there who knows how to wolfram alpha expert for hire who can assist me in designing a Surface Plot in 3D. I have the data and just need someone to design this. Probably approx 2-3 hours work and I'll pay $100 per hour, then I'd like to run an animation of it and not sure in Wolfram Alpha has this capability? Yours sincerely, Peter.

enter image description here

POSTED BY: Peter McGuire
Answer
4 months ago

If you have functional forms for the surfaces you can make this happen in ~5s in Mathematica. You can use the same syntax in Wolfram|Alpha. For instance:

Animate[Plot3D[Sin[Pi*x/n]*Cos[Pi*y/n], {x, -2, 2}, {y, -2, 2}], {n, 1, 4}]

will give you a fun little animation of Sin and Cos functions.

Here's the same query in Alpha

You can then export this animation to the Wolfram Cloud like so:

CloudExport[
 Animate[Plot3D[Sin[Pi*x/n]*Cos[Pi*y/n], {x, -2, 2}, {y, -2, 2}], {n, 
   1, 4}],"GIF","basic_af.gif",
 Permissions -> "Public"
 ]

CloudObject["https://www.wolframcloud.com/objects/b3m2a1.testing/basic_af.gif"]

And if you go to that URL:

https://www.wolframcloud.com/objects/b3m2a1.testing/basic_af.gif

You'll see that GIF.

enter image description here

Finally, you can do this all for free from a free Wolfram Cloud account, which means you don't have to pay anyone anything to get it done.

POSTED BY: b3m2a1 ​ 
Answer
4 months ago

Hey there Peter! If you ever need additional help compiling advanced 3D visualizations or exporting them to a variety of formats to be used in analyis / presentatio; feel free to shoot me an e-mail at williamjduhe@gmail.com.

POSTED BY: William Duhe
Answer
3 months ago

Group Abstract Group Abstract