Please HELP, How combine 2d circle graph(with point which is rounded) into helix 3d graph (motion of particle along circle in the world line)

The name of the pictureThe name of the pictureThe name of the pictureClash Royale CLAN TAG#URR8PPP











up vote
2
down vote

favorite












Manipulate[Graphics[Circle, Red, PointSize@.05, Point@Cos[x], Sin[x]],
 x, 0, 2 Pi]


and



Manipulate[ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 π a], a, 1, 4]





graphics3d







share|improve this question









New contributor




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



















  • Circle is not compatible with ParametricPlot3D. You can use ParametricPlot3D to plot a circle, however.
    – J. M. is somewhat okay.♦
    1 hour ago














up vote
2
down vote

favorite












Manipulate[Graphics[Circle, Red, PointSize@.05, Point@Cos[x], Sin[x]],
 x, 0, 2 Pi]


and



Manipulate[ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 π a], a, 1, 4]





graphics3d







share|improve this question









New contributor




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



















  • Circle is not compatible with ParametricPlot3D. You can use ParametricPlot3D to plot a circle, however.
    – J. M. is somewhat okay.♦
    1 hour ago












up vote
2
down vote

favorite









up vote
2
down vote

favorite











Manipulate[Graphics[Circle, Red, PointSize@.05, Point@Cos[x], Sin[x]],
 x, 0, 2 Pi]


and



Manipulate[ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 π a], a, 1, 4]





graphics3d







share|improve this question









New contributor




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











Manipulate[Graphics[Circle, Red, PointSize@.05, Point@Cos[x], Sin[x]],
 x, 0, 2 Pi]


and



Manipulate[ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 π a], a, 1, 4]





graphics3d




graphics3d






share|improve this question









New contributor




Max 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




Max 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








edited 45 mins ago









kglr

163k8188387




163k8188387






New contributor




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









asked 1 hour ago









Max

111




111




New contributor




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





New contributor





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






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











  • Circle is not compatible with ParametricPlot3D. You can use ParametricPlot3D to plot a circle, however.
    – J. M. is somewhat okay.♦
    1 hour ago
















  • Circle is not compatible with ParametricPlot3D. You can use ParametricPlot3D to plot a circle, however.
    – J. M. is somewhat okay.♦
    1 hour ago















Circle is not compatible with ParametricPlot3D. You can use ParametricPlot3D to plot a circle, however.
– J. M. is somewhat okay.♦
1 hour ago




Circle is not compatible with ParametricPlot3D. You can use ParametricPlot3D to plot a circle, however.
– J. M. is somewhat okay.♦
1 hour ago










2 Answers
2






active

oldest

votes

















up vote
2
down vote













Is this, what you are trying to get:



 Manipulate[
 Show[
 ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 Pi],
 ParametricPlot3D[Cos[t], Sin[t], 0, t, 0, 2 Pi, 
 PlotStyle -> Gray],
 Graphics3D[PointSize[0.03], Gray, Point[Cos[a], Sin[a], 0], Red,
 Point[Cos[a], Sin[a], a/4], Dashed, 
 Line[Cos[a], Sin[a], 0, Cos[a], Sin[a], a/4]]
 ],
 a, 0.1, 0, 6]


yielding the following:



enter image description here



Have fun!






share|improve this answer



























    up vote
    2
    down vote













     Manipulate[Show[ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 π a, 
     MeshFunctions -> #4 &, Mesh -> 2 π a - 1/10000 , 
     MeshStyle -> Directive[Red, PointSize[Large]], 
     PerformanceGoal -> "Quality"], 
     ParametricPlot3D[r Cos[t], r Sin[t], π a/2, t, 0, 2 π , r, 0, 1, 
     PlotStyle -> Opacity[.5], 
     MeshFunctions -> #5 &, Mesh -> 1 - 1/10000, 
     MeshStyle -> Red,
     BoundaryStyle -> None, PerformanceGoal -> "Quality"], 
     PlotRange -> 0, 2 Pi], a, 1, 4]


    enter image description here






    share|improve this answer




















      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',
      convertImagesToLinks: false,
      noModals: false,
      showLowRepImageUploadWarning: true,
      reputationToPostImages: null,
      bindNavPrevention: true,
      postfix: "",
      onDemand: true,
      discardSelector: ".discard-answer"
      ,immediatelyShowMarkdownHelp:true
      );



      );






      Max 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%2f183099%2fplease-help-how-combine-2d-circle-graphwith-point-which-is-rounded-into-helix%23new-answer', 'question_page');

      );

      Post as a guest

















      2 Answers
      2






      active

      oldest

      votes








      2 Answers
      2






      active

      oldest

      votes









      active

      oldest

      votes






      active

      oldest

      votes








      up vote
      2
      down vote













      Is this, what you are trying to get:



       Manipulate[
       Show[
       ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 Pi],
       ParametricPlot3D[Cos[t], Sin[t], 0, t, 0, 2 Pi, 
       PlotStyle -> Gray],
       Graphics3D[PointSize[0.03], Gray, Point[Cos[a], Sin[a], 0], Red,
       Point[Cos[a], Sin[a], a/4], Dashed, 
       Line[Cos[a], Sin[a], 0, Cos[a], Sin[a], a/4]]
       ],
       a, 0.1, 0, 6]


      yielding the following:



      enter image description here



      Have fun!






      share|improve this answer
























        up vote
        2
        down vote













        Is this, what you are trying to get:



         Manipulate[
         Show[
         ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 Pi],
         ParametricPlot3D[Cos[t], Sin[t], 0, t, 0, 2 Pi, 
         PlotStyle -> Gray],
         Graphics3D[PointSize[0.03], Gray, Point[Cos[a], Sin[a], 0], Red,
         Point[Cos[a], Sin[a], a/4], Dashed, 
         Line[Cos[a], Sin[a], 0, Cos[a], Sin[a], a/4]]
         ],
         a, 0.1, 0, 6]


        yielding the following:



        enter image description here



        Have fun!






        share|improve this answer






















          up vote
          2
          down vote










          up vote
          2
          down vote









          Is this, what you are trying to get:



           Manipulate[
           Show[
           ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 Pi],
           ParametricPlot3D[Cos[t], Sin[t], 0, t, 0, 2 Pi, 
           PlotStyle -> Gray],
           Graphics3D[PointSize[0.03], Gray, Point[Cos[a], Sin[a], 0], Red,
           Point[Cos[a], Sin[a], a/4], Dashed, 
           Line[Cos[a], Sin[a], 0, Cos[a], Sin[a], a/4]]
           ],
           a, 0.1, 0, 6]


          yielding the following:



          enter image description here



          Have fun!






          share|improve this answer












          Is this, what you are trying to get:



           Manipulate[
           Show[
           ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 Pi],
           ParametricPlot3D[Cos[t], Sin[t], 0, t, 0, 2 Pi, 
           PlotStyle -> Gray],
           Graphics3D[PointSize[0.03], Gray, Point[Cos[a], Sin[a], 0], Red,
           Point[Cos[a], Sin[a], a/4], Dashed, 
           Line[Cos[a], Sin[a], 0, Cos[a], Sin[a], a/4]]
           ],
           a, 0.1, 0, 6]


          yielding the following:



          enter image description here



          Have fun!







          share|improve this answer












          share|improve this answer



          share|improve this answer










          answered 1 hour ago









          Alexei Boulbitch

          20.5k2369




          20.5k2369




















              up vote
              2
              down vote













               Manipulate[Show[ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 π a, 
               MeshFunctions -> #4 &, Mesh -> 2 π a - 1/10000 , 
               MeshStyle -> Directive[Red, PointSize[Large]], 
               PerformanceGoal -> "Quality"], 
               ParametricPlot3D[r Cos[t], r Sin[t], π a/2, t, 0, 2 π , r, 0, 1, 
               PlotStyle -> Opacity[.5], 
               MeshFunctions -> #5 &, Mesh -> 1 - 1/10000, 
               MeshStyle -> Red,
               BoundaryStyle -> None, PerformanceGoal -> "Quality"], 
               PlotRange -> 0, 2 Pi], a, 1, 4]


              enter image description here






              share|improve this answer
























                up vote
                2
                down vote













                 Manipulate[Show[ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 π a, 
                 MeshFunctions -> #4 &, Mesh -> 2 π a - 1/10000 , 
                 MeshStyle -> Directive[Red, PointSize[Large]], 
                 PerformanceGoal -> "Quality"], 
                 ParametricPlot3D[r Cos[t], r Sin[t], π a/2, t, 0, 2 π , r, 0, 1, 
                 PlotStyle -> Opacity[.5], 
                 MeshFunctions -> #5 &, Mesh -> 1 - 1/10000, 
                 MeshStyle -> Red,
                 BoundaryStyle -> None, PerformanceGoal -> "Quality"], 
                 PlotRange -> 0, 2 Pi], a, 1, 4]


                enter image description here






                share|improve this answer






















                  up vote
                  2
                  down vote










                  up vote
                  2
                  down vote









                   Manipulate[Show[ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 π a, 
                   MeshFunctions -> #4 &, Mesh -> 2 π a - 1/10000 , 
                   MeshStyle -> Directive[Red, PointSize[Large]], 
                   PerformanceGoal -> "Quality"], 
                   ParametricPlot3D[r Cos[t], r Sin[t], π a/2, t, 0, 2 π , r, 0, 1, 
                   PlotStyle -> Opacity[.5], 
                   MeshFunctions -> #5 &, Mesh -> 1 - 1/10000, 
                   MeshStyle -> Red,
                   BoundaryStyle -> None, PerformanceGoal -> "Quality"], 
                   PlotRange -> 0, 2 Pi], a, 1, 4]


                  enter image description here






                  share|improve this answer












                   Manipulate[Show[ParametricPlot3D[Cos[t], Sin[t], t/4, t, 0, 2 π a, 
                   MeshFunctions -> #4 &, Mesh -> 2 π a - 1/10000 , 
                   MeshStyle -> Directive[Red, PointSize[Large]], 
                   PerformanceGoal -> "Quality"], 
                   ParametricPlot3D[r Cos[t], r Sin[t], π a/2, t, 0, 2 π , r, 0, 1, 
                   PlotStyle -> Opacity[.5], 
                   MeshFunctions -> #5 &, Mesh -> 1 - 1/10000, 
                   MeshStyle -> Red,
                   BoundaryStyle -> None, PerformanceGoal -> "Quality"], 
                   PlotRange -> 0, 2 Pi], a, 1, 4]


                  enter image description here







                  share|improve this answer












                  share|improve this answer



                  share|improve this answer










                  answered 1 hour ago









                  kglr

                  163k8188387




                  163k8188387




















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









                       

                      draft saved


                      draft discarded


















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












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











                      Max 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%2f183099%2fplease-help-how-combine-2d-circle-graphwith-point-which-is-rounded-into-helix%23new-answer', 'question_page');

                      );

                      Post as a guest
































































                      Comments

                      Post a Comment

                      Popular posts from this blog

                      Long meetings (6-7 hours a day): Being “babysat” by supervisor

                      Image
                      Clash Royale CLAN TAG #URR8PPP .everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty margin-bottom:0; up vote 31 down vote favorite 4 I hold a PhD in mechanical engineering with a 7 year background in self-guided, self-paced research including 2 years as a graduate level course instructor and a subject matter expert for various engineering projects in a university setting in the United States. For the last 10-11 months, I am working in a research industry in France where my task is to debug C++ spaghetti code written over a period of several years by my current supervisor. It is a team of 2: just I and my supervisor. Diurnally, I am posed with a "bug of the day" to get out of this C++ code. My supervisor generally gives me about 15-30 minutes to solve it and then accosts me about whether or not the task is completed and then rinses and repeats this until the end of the day. Off-late, my supervisor has been holding 6-7 hour long "meetin
                      Read more

                      Is the Concept of Multiple Fantasy Races Scientifically Flawed? [closed]

                      Image
                      Clash Royale CLAN TAG #URR8PPP up vote 2 down vote favorite Many fantasy worlds have multiple humanoid species (elves, orcs, humans, etc) living in the same world, in addition to that, they often have the ability to interbreed. And I can't help but question their believability... fantasy-races reproduction interspecies-relations share | improve this question edited Aug 9 at 14:46 Michael Kjörling ♦ 21.1k 10 85 161 asked Aug 9 at 13:13 Chlodio 118 6 closed as unclear what you're asking by MichaelK, Gryphon, John, Vincent, Frostfyre Aug 9 at 15:25 Please clarify your specific problem or add additional details to highlight exactly what you need. As it's currently written, it’s hard to tell exactly what you're asking. See the How to Ask page for help clarifying this question. If this question can be reworded to fit the rules in the help center, please edit the question. 3 Stack Exchange exist to
                      Read more

                      Confectionery

                      Image
                      Prepared foods made with a lot of sugar or other cabohydrates "Sweetmeat" redirects here. For the racehorse, see Sweetmeat (horse). Not to be confused with Sweetbread. This Kransekake is a traditional Scandinavian baker's confection. Confectionery is the art of making confections , which are food items that are rich in sugar and carbohydrates. Exact definitions are difficult. [1] In general, though, confectionery is divided into two broad and somewhat overlapping categories, bakers' confections and sugar confections. [2] Bakers' confectionery, also called flour confections , includes principally sweet pastries, cakes, and similar baked goods. Sugar confectionery includes candies ( sweets in British English), candied nuts, chocolates, chewing gum, bubble gum, pastillage, and other confections that are made primarily of sugar. In some cases, chocolate confections (confections made of chocolate) are treated as a separate category, as are sugar-free versions of
                      Read more