Skip to main content
Tweeted twitter.com/StackMma/status/1000918484497387521
grammar
Source Link
mdcq
  • 247
  • 3
  • 6

I know this is not the first question on creating an animation of a 3D plot, but I found no answer to the following question: How can I create an animated rotating plot with axes labels that are readable? What I currently have doesn't look good. The axes colors are weird and irregular, the cube rotates not around its center and the axes labels jump around to different axes.

enter image description here

My code currently is adapted from this answer

anim = Table[ RegionPlot3D[ 0 <= x <= y <= z <= 1, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, PlotRange -> {{0, 1.2}, {0, 1.2}, {0, 1.2}}, PlotStyle -> Opacity[0.7], Boxed -> False, ViewCenter -> {0.5, 0.5, 0.5}, ViewVector -> {5 Sin[t], 5 Cos[t], 0} ], {t, 0, 2*Pi, Pi/30}]; Export["animated.gif", anim] 

I want it to look similar to the following. Also the plot should rotate exactly once around its axis so that the loop of the gif isn't noticeable. Great would be if there was one variable which changesallows to quickly change the speed of the rotation without changingbreaking that it rotates exactly once.

enter image description here

I know this is not the first question on creating an animation of a 3D plot, but I found no answer to the following question: How can I create an animated rotating plot with axes labels that are readable? What I currently have doesn't look good. The axes colors are weird and irregular, the cube rotates not around its center and the axes labels jump around to different axes.

enter image description here

My code currently is adapted from this answer

anim = Table[ RegionPlot3D[ 0 <= x <= y <= z <= 1, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, PlotRange -> {{0, 1.2}, {0, 1.2}, {0, 1.2}}, PlotStyle -> Opacity[0.7], Boxed -> False, ViewCenter -> {0.5, 0.5, 0.5}, ViewVector -> {5 Sin[t], 5 Cos[t], 0} ], {t, 0, 2*Pi, Pi/30}]; Export["animated.gif", anim] 

I want it to look similar to the following. Also the plot should rotate exactly once around its axis so that the loop of the gif isn't noticeable. Great would be if there was one variable which changes the speed of rotation without changing that it rotates exactly once.

enter image description here

I know this is not the first question on creating an animation of a 3D plot, but I found no answer to the following question: How can I create an animated rotating plot with axes labels that are readable? What I currently have doesn't look good. The axes colors are weird and irregular, the cube rotates not around its center and the axes labels jump around to different axes.

enter image description here

My code currently is adapted from this answer

anim = Table[ RegionPlot3D[ 0 <= x <= y <= z <= 1, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, PlotRange -> {{0, 1.2}, {0, 1.2}, {0, 1.2}}, PlotStyle -> Opacity[0.7], Boxed -> False, ViewCenter -> {0.5, 0.5, 0.5}, ViewVector -> {5 Sin[t], 5 Cos[t], 0} ], {t, 0, 2*Pi, Pi/30}]; Export["animated.gif", anim] 

I want it to look similar to the following. Also the plot should rotate exactly once around its axis so that the loop of the gif isn't noticeable. Great would be if there was one variable which allows to quickly change the speed of the rotation without breaking that it rotates exactly once.

enter image description here

clarification
Source Link
mdcq
  • 247
  • 3
  • 6

I know this is not the first question on creating an animation of a 3D plot, but I found no answereanswer to the following question: How can I create an animated rotating plot with axes labels that are readable? What I currently have doesn't look good. The axes colors are weird and irregular, the cube rotates not around its center and the axes labels are not readable since they jump around to different axes. Also it's not centered and doesn't rotate a full rotation.

enter image description here

My code currently is adapted from this answer

anim = Table[ RegionPlot3D[ 0 <= x <= y <= z <= 1, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, PlotRange -> {{0, 1.2}, {0, 1.2}, {0, 1.2}}, PlotStyle -> Opacity[0.7], Boxed -> False, ViewCenter -> {0.5, 0.5, 0.5}, ViewVector -> {5 Sin[t], 5 Cos[t], 0} ], {t, 0, 2*Pi, Pi/30}]; Export["animated.gif", anim] 

I want it to look similar to the following, which is centered and has a slight view from above. Also the plot should rotate exactly once around its axis so that the loop of the gif isn't noticeable. Great would be if there was one variable which changes the speed of rotation without changing that it rotates exactly once.

enter image description here

I know this is not the first question on creating an animation of a 3D plot, but I found no answere to the following question: How can I create an animated rotating plot with axes labels that are readable? What I currently have doesn't look good and the axes labels are not readable since they jump around to different axes. Also it's not centered and doesn't rotate a full rotation.

enter image description here

My code currently is adapted from this answer

anim = Table[ RegionPlot3D[ 0 <= x <= y <= z <= 1, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, PlotRange -> {{0, 1.2}, {0, 1.2}, {0, 1.2}}, PlotStyle -> Opacity[0.7], Boxed -> False, ViewCenter -> {0.5, 0.5, 0.5}, ViewVector -> {5 Sin[t], 5 Cos[t], 0} ], {t, 0, 2*Pi, Pi/30}]; Export["animated.gif", anim] 

I want it to look similar to the following, which is centered and has a slight view from above. Also the plot should rotate exactly once around its axis so that the loop of the gif isn't noticeable.

enter image description here

I know this is not the first question on creating an animation of a 3D plot, but I found no answer to the following question: How can I create an animated rotating plot with axes labels that are readable? What I currently have doesn't look good. The axes colors are weird and irregular, the cube rotates not around its center and the axes labels jump around to different axes.

enter image description here

My code currently is adapted from this answer

anim = Table[ RegionPlot3D[ 0 <= x <= y <= z <= 1, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, PlotRange -> {{0, 1.2}, {0, 1.2}, {0, 1.2}}, PlotStyle -> Opacity[0.7], Boxed -> False, ViewCenter -> {0.5, 0.5, 0.5}, ViewVector -> {5 Sin[t], 5 Cos[t], 0} ], {t, 0, 2*Pi, Pi/30}]; Export["animated.gif", anim] 

I want it to look similar to the following. Also the plot should rotate exactly once around its axis so that the loop of the gif isn't noticeable. Great would be if there was one variable which changes the speed of rotation without changing that it rotates exactly once.

enter image description here

fixed typos
Source Link
mdcq
  • 247
  • 3
  • 6

I know this is not the first question on creating an animation of a 3D plot, but I found no answere to the following question: How can I create an animated rotating plot with axes labels that are readable? What I currently have doesn't look good and the axes labels are not readable since they jump around to different axes. Also it's not centered and doesn't rotate a full rotation.

enter image description here

My code currently is adapted from this answer

anim = Table[ RegionPlot3D[ 0 <= x <= y <= z <= 1, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, PlotRange -> {{0, n1.2}, {0, n1.2}, {0, n1.2}}, PlotStyle -> Opacity[0.7], AxesStyle ->}, Boxed -> False, ViewCenter -> {0.5, 0.5, 0.5}, ViewVector -> {5 Sin[t], 5 Cos[t], 0} ], {t, 0, 2*Pi, Pi/30}]; Export["animated.gif", anim] 

I want it to look similar to the following, which is centered and has a slight view from above. Also the plot should rotate exactly once around its axis so that the loop of the gif isn't noticeable.

enter image description here

I know this is not the first question on creating an animation of a 3D plot, but I found no answere to the following question: How can I create an animated rotating plot with axes labels that are readable? What I currently have doesn't look good and the axes labels are not readable since they jump around to different axes. Also it's not centered and doesn't rotate a full rotation.

enter image description here

My code currently is adapted from this answer

anim = Table[ RegionPlot3D[ 0 <= x <= y <= z <= 1, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, PlotRange -> {{0, n}, {0, n}, {0, n}}, PlotStyle -> Opacity[0.7], AxesStyle ->}, Boxed -> False, ViewCenter -> {0.5, 0.5, 0.5}, ViewVector -> {Sin[t], Cos[t], 0} ], {t, 0, 2*Pi, Pi/30}]; Export["animated.gif", anim] 

I want it to look similar to the following, which is centered and has a slight view from above. Also the plot should rotate exactly once around its axis so that the loop of the gif isn't noticeable.

enter image description here

I know this is not the first question on creating an animation of a 3D plot, but I found no answere to the following question: How can I create an animated rotating plot with axes labels that are readable? What I currently have doesn't look good and the axes labels are not readable since they jump around to different axes. Also it's not centered and doesn't rotate a full rotation.

enter image description here

My code currently is adapted from this answer

anim = Table[ RegionPlot3D[ 0 <= x <= y <= z <= 1, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, PlotRange -> {{0, 1.2}, {0, 1.2}, {0, 1.2}}, PlotStyle -> Opacity[0.7], Boxed -> False, ViewCenter -> {0.5, 0.5, 0.5}, ViewVector -> {5 Sin[t], 5 Cos[t], 0} ], {t, 0, 2*Pi, Pi/30}]; Export["animated.gif", anim] 

I want it to look similar to the following, which is centered and has a slight view from above. Also the plot should rotate exactly once around its axis so that the loop of the gif isn't noticeable.

enter image description here

Source Link
mdcq
  • 247
  • 3
  • 6
Loading