Plot of a tornado-shaped surface The Next CEO of Stack OverflowStrange spikes in my surfacePlot closed surface with ListPlot3Dinterpolating a smooth closed surface to a non-uniform data set (ListSurfacePlot3D)Plot a revolution surface, with two cross sections to show its shapeSolution of a 5D Hypersurface and a 3D SurfacePlot Surface from Curves and Shortest DistancePlot 2D B-spline curve on 3D B-spline surfaceHow to convert a polar plot in surface PlotPlot surface defined by inequalityHow to create a surface plot using unequal vectors
Shortening a title without changing its meaning
Small nick on power cord from an electric alarm clock, and copper wiring exposed but intact
Can Sri Krishna be called 'a person'?
Would a grinding machine be a simple and workable propulsion system for an interplanetary spacecraft?
Compensation for working overtime on Saturdays
Gauss' Posthumous Publications?
Are British MPs missing the point, with these 'Indicative Votes'?
Is this a new Fibonacci Identity?
Could a dragon use hot air to help it take off?
What steps are necessary to read a Modern SSD in Medieval Europe?
Does Germany produce more waste than the US?
Is it possible to create a QR code using text?
Why do we say “un seul M” and not “une seule M” even though M is a “consonne”?
How to implement Comparable so it is consistent with identity-equality
Car headlights in a world without electricity
Is there a rule of thumb for determining the amount one should accept for a settlement offer?
Is it correct to say moon starry nights?
Why can't we say "I have been having a dog"?
Direct Implications Between USA and UK in Event of No-Deal Brexit
Ising model simulation
Is the offspring between a demon and a celestial possible? If so what is it called and is it in a book somewhere?
Can I cast Thunderwave and be at the center of its bottom face, but not be affected by it?
How can I separate the number from the unit in argument?
Oldie but Goldie
Plot of a tornado-shaped surface
The Next CEO of Stack OverflowStrange spikes in my surfacePlot closed surface with ListPlot3Dinterpolating a smooth closed surface to a non-uniform data set (ListSurfacePlot3D)Plot a revolution surface, with two cross sections to show its shapeSolution of a 5D Hypersurface and a 3D SurfacePlot Surface from Curves and Shortest DistancePlot 2D B-spline curve on 3D B-spline surfaceHow to convert a polar plot in surface PlotPlot surface defined by inequalityHow to create a surface plot using unequal vectors
$begingroup$
What is a simple code to plot a surface shaped like a tornado?
Any help is welcome.
plotting
edited Mar 22 at 11:51
J. M. is slightly pensive♦
98.9k10311467
asked Mar 22 at 2:39
janmarqzjanmarqz
1515
$endgroup$
add a comment |
$begingroup$
What is a simple code to plot a surface shaped like a tornado?
Any help is welcome.
plotting
edited Mar 22 at 11:51
J. M. is slightly pensive♦
98.9k10311467
asked Mar 22 at 2:39
janmarqzjanmarqz
1515
$endgroup$
add a comment |
$begingroup$
What is a simple code to plot a surface shaped like a tornado?
Any help is welcome.
plotting
edited Mar 22 at 11:51
J. M. is slightly pensive♦
98.9k10311467
asked Mar 22 at 2:39
janmarqzjanmarqz
1515
$endgroup$
What is a simple code to plot a surface shaped like a tornado?
Any help is welcome.
plotting
plotting
edited Mar 22 at 11:51
J. M. is slightly pensive♦
98.9k10311467
asked Mar 22 at 2:39
janmarqzjanmarqz
1515
edited Mar 22 at 11:51
J. M. is slightly pensive♦
98.9k10311467
asked Mar 22 at 2:39
janmarqzjanmarqz
1515
edited Mar 22 at 11:51
J. M. is slightly pensive♦
98.9k10311467
edited Mar 22 at 11:51
J. M. is slightly pensive♦
98.9k10311467
edited Mar 22 at 11:51
J. M. is slightly pensive♦
98.9k10311467
98.9k10311467
asked Mar 22 at 2:39
janmarqzjanmarqz
1515
asked Mar 22 at 2:39
janmarqzjanmarqz
1515
asked Mar 22 at 2:39
janmarqzjanmarqz
1515
1515
add a comment |
add a comment |
2 Answers
2
active
oldest
votes
$begingroup$
I like "surface synthesis" questions. Here's a simple-minded model that combines an Archimedean spiral with a power law curve:
With[h = 1/10, n = 24, c = 4, p = 2/3,
ParametricPlot3D[t (h Cos[n t] + Cos[v]), t (h Sin[n t] + Sin[v]), (c t)^p,
t, 0, 3, v, 0, 2 π, Axes -> None, Boxed -> False,
Lighting -> "Neutral", Mesh -> False, PlotPoints -> 85,
PlotStyle -> Opacity[3/4, Black], ViewPoint -> 3.2, -1.6, 1.]]
Adjust parameters as seen fit.
answered Mar 22 at 6:01
J. M. is slightly pensive♦J. M. is slightly pensive
98.9k10311467
$endgroup$
5
$begingroup$
(I should prolly do a cartoon of the "tornado" moving about in a random walk...)
$endgroup$
– J. M. is slightly pensive♦
Mar 22 at 12:38
add a comment |
$begingroup$
My quick go at it:
ContourPlot3D[
(x - z/5 Cos[[Pi] z])^2 + (y - z/5 Sin[[Pi] z])^2 == (z/4)^2
, x, -1, 1, y, -1, 1, z, 0, 2
, Mesh -> None, Axes -> False, Boxed -> False
, PlotTheme -> "ThickSurface", ContourStyle -> RGBColor[0.41, 0.5, 0.63]
]
answered Mar 22 at 3:32
Thies HeideckeThies Heidecke
7,2812639
$endgroup$
add a comment |
StackExchange.ifUsing("editor", function ()
return StackExchange.using("mathjaxEditing", function ()
StackExchange.MarkdownEditor.creationCallbacks.add(function (editor, postfix)
StackExchange.mathjaxEditing.prepareWmdForMathJax(editor, postfix, [["$", "$"], ["\\(","\\)"]]);
);
);
, "mathjax-editing");
StackExchange.ready(function()
var channelOptions =
tags: "".split(" "),
id: "387"
;
initTagRenderer("".split(" "), "".split(" "), channelOptions);
StackExchange.using("externalEditor", function()
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled)
StackExchange.using("snippets", function()
createEditor();
);
else
createEditor();
);
function createEditor()
StackExchange.prepareEditor(
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: false,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: null,
bindNavPrevention: true,
postfix: "",
imageUploader:
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
,
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
);
);
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f193743%2fplot-of-a-tornado-shaped-surface%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
2 Answers
2
active
oldest
votes
2 Answers
2
active
oldest
votes
active
oldest
votes
active
oldest
votes
$begingroup$
I like "surface synthesis" questions. Here's a simple-minded model that combines an Archimedean spiral with a power law curve:
With[h = 1/10, n = 24, c = 4, p = 2/3,
ParametricPlot3D[t (h Cos[n t] + Cos[v]), t (h Sin[n t] + Sin[v]), (c t)^p,
t, 0, 3, v, 0, 2 π, Axes -> None, Boxed -> False,
Lighting -> "Neutral", Mesh -> False, PlotPoints -> 85,
PlotStyle -> Opacity[3/4, Black], ViewPoint -> 3.2, -1.6, 1.]]
Adjust parameters as seen fit.
answered Mar 22 at 6:01
J. M. is slightly pensive♦J. M. is slightly pensive
98.9k10311467
$endgroup$
5
$begingroup$
(I should prolly do a cartoon of the "tornado" moving about in a random walk...)
$endgroup$
– J. M. is slightly pensive♦
Mar 22 at 12:38
add a comment |
$begingroup$
I like "surface synthesis" questions. Here's a simple-minded model that combines an Archimedean spiral with a power law curve:
With[h = 1/10, n = 24, c = 4, p = 2/3,
ParametricPlot3D[t (h Cos[n t] + Cos[v]), t (h Sin[n t] + Sin[v]), (c t)^p,
t, 0, 3, v, 0, 2 π, Axes -> None, Boxed -> False,
Lighting -> "Neutral", Mesh -> False, PlotPoints -> 85,
PlotStyle -> Opacity[3/4, Black], ViewPoint -> 3.2, -1.6, 1.]]
Adjust parameters as seen fit.
answered Mar 22 at 6:01
J. M. is slightly pensive♦J. M. is slightly pensive
98.9k10311467
$endgroup$
5
$begingroup$
(I should prolly do a cartoon of the "tornado" moving about in a random walk...)
$endgroup$
– J. M. is slightly pensive♦
Mar 22 at 12:38
add a comment |
$begingroup$
I like "surface synthesis" questions. Here's a simple-minded model that combines an Archimedean spiral with a power law curve:
With[h = 1/10, n = 24, c = 4, p = 2/3,
ParametricPlot3D[t (h Cos[n t] + Cos[v]), t (h Sin[n t] + Sin[v]), (c t)^p,
t, 0, 3, v, 0, 2 π, Axes -> None, Boxed -> False,
Lighting -> "Neutral", Mesh -> False, PlotPoints -> 85,
PlotStyle -> Opacity[3/4, Black], ViewPoint -> 3.2, -1.6, 1.]]
Adjust parameters as seen fit.
answered Mar 22 at 6:01
J. M. is slightly pensive♦J. M. is slightly pensive
98.9k10311467
$endgroup$
I like "surface synthesis" questions. Here's a simple-minded model that combines an Archimedean spiral with a power law curve:
With[h = 1/10, n = 24, c = 4, p = 2/3,
ParametricPlot3D[t (h Cos[n t] + Cos[v]), t (h Sin[n t] + Sin[v]), (c t)^p,
t, 0, 3, v, 0, 2 π, Axes -> None, Boxed -> False,
Lighting -> "Neutral", Mesh -> False, PlotPoints -> 85,
PlotStyle -> Opacity[3/4, Black], ViewPoint -> 3.2, -1.6, 1.]]
Adjust parameters as seen fit.
answered Mar 22 at 6:01
J. M. is slightly pensive♦J. M. is slightly pensive
98.9k10311467
answered Mar 22 at 6:01
J. M. is slightly pensive♦J. M. is slightly pensive
98.9k10311467
answered Mar 22 at 6:01
J. M. is slightly pensive♦J. M. is slightly pensive
98.9k10311467
answered Mar 22 at 6:01
J. M. is slightly pensive♦J. M. is slightly pensive
98.9k10311467
98.9k10311467
5
$begingroup$
(I should prolly do a cartoon of the "tornado" moving about in a random walk...)
$endgroup$
– J. M. is slightly pensive♦
Mar 22 at 12:38
add a comment |
5
$begingroup$
(I should prolly do a cartoon of the "tornado" moving about in a random walk...)
$endgroup$
– J. M. is slightly pensive♦
Mar 22 at 12:38
5
5
$begingroup$
(I should prolly do a cartoon of the "tornado" moving about in a random walk...)
$endgroup$
– J. M. is slightly pensive♦
Mar 22 at 12:38
$begingroup$
(I should prolly do a cartoon of the "tornado" moving about in a random walk...)
$endgroup$
– J. M. is slightly pensive♦
Mar 22 at 12:38
add a comment |
$begingroup$
My quick go at it:
ContourPlot3D[
(x - z/5 Cos[[Pi] z])^2 + (y - z/5 Sin[[Pi] z])^2 == (z/4)^2
, x, -1, 1, y, -1, 1, z, 0, 2
, Mesh -> None, Axes -> False, Boxed -> False
, PlotTheme -> "ThickSurface", ContourStyle -> RGBColor[0.41, 0.5, 0.63]
]
answered Mar 22 at 3:32
Thies HeideckeThies Heidecke
7,2812639
$endgroup$
add a comment |
$begingroup$
My quick go at it:
ContourPlot3D[
(x - z/5 Cos[[Pi] z])^2 + (y - z/5 Sin[[Pi] z])^2 == (z/4)^2
, x, -1, 1, y, -1, 1, z, 0, 2
, Mesh -> None, Axes -> False, Boxed -> False
, PlotTheme -> "ThickSurface", ContourStyle -> RGBColor[0.41, 0.5, 0.63]
]
answered Mar 22 at 3:32
Thies HeideckeThies Heidecke
7,2812639
$endgroup$
add a comment |
$begingroup$
My quick go at it:
ContourPlot3D[
(x - z/5 Cos[[Pi] z])^2 + (y - z/5 Sin[[Pi] z])^2 == (z/4)^2
, x, -1, 1, y, -1, 1, z, 0, 2
, Mesh -> None, Axes -> False, Boxed -> False
, PlotTheme -> "ThickSurface", ContourStyle -> RGBColor[0.41, 0.5, 0.63]
]
answered Mar 22 at 3:32
Thies HeideckeThies Heidecke
7,2812639
$endgroup$
My quick go at it:
ContourPlot3D[
(x - z/5 Cos[[Pi] z])^2 + (y - z/5 Sin[[Pi] z])^2 == (z/4)^2
, x, -1, 1, y, -1, 1, z, 0, 2
, Mesh -> None, Axes -> False, Boxed -> False
, PlotTheme -> "ThickSurface", ContourStyle -> RGBColor[0.41, 0.5, 0.63]
]
answered Mar 22 at 3:32
Thies HeideckeThies Heidecke
7,2812639
answered Mar 22 at 3:32
Thies HeideckeThies Heidecke
7,2812639
answered Mar 22 at 3:32
Thies HeideckeThies Heidecke
7,2812639
answered Mar 22 at 3:32
Thies HeideckeThies Heidecke
7,2812639
7,2812639
add a comment |
add a comment |
Thanks for contributing an answer to Mathematica Stack Exchange!
- Please be sure to answer the question. Provide details and share your research!
But avoid …
- Asking for help, clarification, or responding to other answers.
- Making statements based on opinion; back them up with references or personal experience.
Use MathJax to format equations. MathJax reference.
To learn more, see our tips on writing great answers.
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f193743%2fplot-of-a-tornado-shaped-surface%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
