Plot of a tornado shape like surfaceDrawing a shape on the mesh of a Plot3DHow to make a smooth revolution...

What is the highest possible scrabble score for placing a single tile

Why is so much work done on numerical verification of the Riemann Hypothesis?

Showing a sum is positive

C++ copy constructor called at return

How can I write humor as character trait?

Will number of steps recorded on FitBit/any fitness tracker add up distance in PokemonGo?

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

How can ping know if my host is down

"It doesn't matter" or "it won't matter"?

When were female captains banned from Starfleet?

Stack Interview Code methods made from class Node and Smart Pointers

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

What does "Scientists rise up against statistical significance" mean? (Comment in Nature)

Why is it that I can sometimes guess the next note?

How to explain what's wrong with this application of the chain rule?

Does an advisor owe his/her student anything? Will an advisor keep a PhD student only out of pity?

The Digit Triangles

Review your own paper in Mathematics

Why is the Sun approximated as a black body at ~ 5800 K?

How to draw a matrix with arrows in limited space

Is there a way to have vectors outlined in a Vector Plot?

Why does the Sun have different day lengths, but not the gas giants?

Why does this expression simplify as such?

Why does Carol not get rid of the Kree symbol on her suit when she changes its colours?



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 26 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

                              ORA-01691 (unable to extend lob segment) even though my tablespace has AUTOEXTEND onORA-01692: unable to...

                              Always On Availability groups resolving state after failover - Remote harden of transaction...

                              Circunscripción electoral de Guipúzcoa Referencias Menú de navegaciónLas claves del sistema electoral en...