Plot of a tornado shape like surfaceDrawing a shape on the mesh of a Plot3DHow to make a smooth revolution surface plotPlotting 3D arrows on a surfaceSurface Plot 3D of a strongly concave shapePlot closed surface with ListPlot3DA method to draw a surface around a set of regularly spaced pointsPlot a revolution surface, with two cross sections to show its shapeHow to draw a proper surface with ListPlot3D?How to convert a polar plot in surface PlotPlot surface defined by inequality

Does "he squandered his car on drink" sound natural?

Why do ¬, ∀ and ∃ have the same precedence?

Review your own paper in Mathematics

Showing a sum is positive

How can I write humor as character trait?

Does Doodling or Improvising on the Piano Have Any Benefits?

The IT department bottlenecks progress, how should I handle this?

How much theory knowledge is actually used while playing?

Which Article Helped Get Rid of Technobabble in RPGs?

What (the heck) is a Super Worm Equinox Moon?

Microchip documentation does not label CAN buss pins on micro controller pinout diagram

How to preserve electronics (computers, iPads and phones) for hundreds of years

Taxes on Dividends in a Roth IRA

Are Captain Marvel's powers affected by Thanos breaking the Tesseract and claiming the stone?

It grows, but water kills it

How can ping know if my host is down

Why does this expression simplify as such?

How to get directions in deep space?

Non-trope happy ending?

Why do Radio Buttons not fill the entire outer circle?

Is there any evidence that Cleopatra and Caesarion considered fleeing to India to escape the Romans?

Creating two special characters

Multiplicative persistence

Shouldn’t conservatives embrace universal basic income?



Plot of a tornado shape like surface


Drawing a shape on the mesh of a Plot3DHow to make a smooth revolution surface plotPlotting 3D arrows on a surfaceSurface Plot 3D of a strongly concave shapePlot closed surface with ListPlot3DA method to draw a surface around a set of regularly spaced pointsPlot a revolution surface, with two cross sections to show its shapeHow to draw a proper surface with ListPlot3D?How to convert a polar plot in surface PlotPlot surface defined by inequality













3












$begingroup$


Which will be a simple code to plot a shape of a surface tornado like cone?
Any help is welcome.










share|improve this question







New contributor




janmarqz is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.







$endgroup$
















    3












    $begingroup$


    Which will be a simple code to plot a shape of a surface tornado like cone?
    Any help is welcome.










    share|improve this question







    New contributor




    janmarqz is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
    Check out our Code of Conduct.







    $endgroup$














      3












      3








      3





      $begingroup$


      Which will be a simple code to plot a shape of a surface tornado like cone?
      Any help is welcome.










      share|improve this question







      New contributor




      janmarqz is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.







      $endgroup$




      Which will be a simple code to plot a shape of a surface tornado like cone?
      Any help is welcome.







      plotting






      share|improve this question







      New contributor




      janmarqz is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.











      share|improve this question







      New contributor




      janmarqz is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.









      share|improve this question




      share|improve this question






      New contributor




      janmarqz is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.









      asked 3 hours ago









      janmarqzjanmarqz

      1163




      1163




      New contributor




      janmarqz is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.





      New contributor





      janmarqz is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.






      janmarqz is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.




















          2 Answers
          2






          active

          oldest

          votes


















          2












          $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]
          ]


          Tornado






          share|improve this answer









          $endgroup$




















            1












            $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.]]


            tornado?



            Adjust parameters as seen fit.






            share|improve this answer









            $endgroup$












              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
              );



              );






              janmarqz is a new contributor. Be nice, and check out our Code of Conduct.









              draft saved

              draft discarded


















              StackExchange.ready(
              function ()
              StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f193743%2fplot-of-a-tornado-shape-like-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









              2












              $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]
              ]


              Tornado






              share|improve this answer









              $endgroup$

















                2












                $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]
                ]


                Tornado






                share|improve this answer









                $endgroup$















                  2












                  2








                  2





                  $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]
                  ]


                  Tornado






                  share|improve this answer









                  $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]
                  ]


                  Tornado







                  share|improve this answer












                  share|improve this answer



                  share|improve this answer










                  answered 2 hours ago









                  Thies HeideckeThies Heidecke

                  7,0712638




                  7,0712638





















                      1












                      $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.]]


                      tornado?



                      Adjust parameters as seen fit.






                      share|improve this answer









                      $endgroup$

















                        1












                        $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.]]


                        tornado?



                        Adjust parameters as seen fit.






                        share|improve this answer









                        $endgroup$















                          1












                          1








                          1





                          $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.]]


                          tornado?



                          Adjust parameters as seen fit.






                          share|improve this answer









                          $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.]]


                          tornado?



                          Adjust parameters as seen fit.







                          share|improve this answer












                          share|improve this answer



                          share|improve this answer










                          answered 17 mins ago









                          J. M. is slightly pensiveJ. M. is slightly pensive

                          98.1k10306465




                          98.1k10306465




















                              janmarqz is a new contributor. Be nice, and check out our Code of Conduct.









                              draft saved

                              draft discarded


















                              janmarqz is a new contributor. Be nice, and check out our Code of Conduct.












                              janmarqz is a new contributor. Be nice, and check out our Code of Conduct.











                              janmarqz is a new contributor. Be nice, and check out our Code of Conduct.














                              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.




                              draft saved


                              draft discarded














                              StackExchange.ready(
                              function ()
                              StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f193743%2fplot-of-a-tornado-shape-like-surface%23new-answer', 'question_page');

                              );

                              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







                              Popular posts from this blog

                              Dapidodigma demeter Subspecies | Notae | Tabula navigationisDapidodigmaAfrotropical Butterflies: Lycaenidae - Subtribe IolainaAmplifica

                              Constantinus Vanšenkin Nexus externi | Tabula navigationisБольшая российская энциклопедияAmplifica

                              Vas sanguineum Index Historia | Divisio | Constructio anatomica | Vasorum sanguineorum morbi (angiopathiae) | Notae | Nexus interniTabula navigationisAmplifica