Wolfram Function Repository

Instant-use add-on functions for the Wolfram Language

Function Repository Resource:

 SpinShow

Source Notebook

Create a dynamically rotating Graphics3D object

Contributed by: Jon McLoone

ResourceFunction["SpinShow"][gr]

displays Graphics3D object gr so that it rotates dynamically.

ResourceFunction["SpinShow"][gr,n]

displays Graphics3D object gr so that it rotates dynamically with a period of n seconds.

Examples

Basic Examples (1) 

Create a rotating 3D plot:

In[1]:=
ResourceFunction["SpinShow"][Plot3D[Sin[x y], {x, 0, 4}, {y, 0, 4}]]
Out[1]=

Scope (2) 

The default rotation period is 10 seconds, but you can create plots that rotate more slowly:

In[2]:=
ResourceFunction["SpinShow"][ Plot3D[Sin[x y], {x, 0, 4}, {y, 0, 4}], 60]
Out[2]=

Or more quickly:

In[3]:=
ResourceFunction["SpinShow"][Plot3D[Sin[x y], {x, 0, 4}, {y, 0, 4}], 4]
Out[3]=

Publisher

Jon McLoone

Requirements

Wolfram Language 11.3 (March 2018) or above

Version History

  • 1.0.1 – 28 October 2022
  • 1.0.0 – 03 April 2019

Related Resources

License Information