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
Is there a difference between "Fahrstuhl" and "Aufzug"
Apart from "berlinern", do any other German dialects have a corresponding verb?
Why do airplanes bank sharply to the right after air-to-air refueling?
How can I quit an app using Terminal?
How to make a software documentation "officially" citable?
India just shot down a satellite from the ground. At what altitude range is the resulting debris field?
What is the purpose of the Evocation wizard's Potent Cantrip feature?
Hindi speaking tourist to UK from India
How to make a variable always equal to the result of some calculations?
Grabbing quick drinks
Extending anchors in TikZ
How do you know when two objects are so called entangled?
Opposite of a diet
How to get regions to plot as graphics
Why is the US ranked as #45 in Press Freedom ratings, despite its extremely permissive free speech laws?
How to Reset Passwords on Multiple Websites Easily?
How to be diplomatic in refusing to write code that breaches the privacy of our users
How do I go from 300 unfinished/half written blog posts, to published posts?
Clustering points and summing up attributes per cluster in QGIS
WOW air has ceased operation, can I get my tickets refunded?
I believe this to be a fraud - hired, then asked to cash check and send cash as Bitcoin
Extracting names from filename in bash
Why do professional authors make "consistency" mistakes? And how to avoid them?
How do I construct this japanese bowl?
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.7k10311467
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.7k10311467
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.7k10311467
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.7k10311467
asked Mar 22 at 2:39
janmarqzjanmarqz
1515
edited Mar 22 at 11:51
J. M. is slightly pensive♦
98.7k10311467
asked Mar 22 at 2:39
janmarqzjanmarqz
1515
edited Mar 22 at 11:51
J. M. is slightly pensive♦
98.7k10311467
edited Mar 22 at 11:51
J. M. is slightly pensive♦
98.7k10311467
edited Mar 22 at 11:51
J. M. is slightly pensive♦
98.7k10311467
98.7k10311467
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.7k10311467
$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 |
Your Answer
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.7k10311467
$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.7k10311467
$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.7k10311467
$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.7k10311467
answered Mar 22 at 6:01
J. M. is slightly pensive♦J. M. is slightly pensive
98.7k10311467
answered Mar 22 at 6:01
J. M. is slightly pensive♦J. M. is slightly pensive
98.7k10311467
answered Mar 22 at 6:01
J. M. is slightly pensive♦J. M. is slightly pensive
98.7k10311467
98.7k10311467
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
