How to 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
4
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.















  • 1




    Circle is not compatible with ParametricPlot3D. You can use ParametricPlot3D to plot a circle, however.
    – J. M. is somewhat okay.♦
    Oct 4 at 8:53














up vote
4
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.















  • 1




    Circle is not compatible with ParametricPlot3D. You can use ParametricPlot3D to plot a circle, however.
    – J. M. is somewhat okay.♦
    Oct 4 at 8:53












up vote
4
down vote

favorite









up vote
4
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 Oct 4 at 10:57









kglr

164k8188388




164k8188388






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 Oct 4 at 8:44









Max

211




211




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.







  • 1




    Circle is not compatible with ParametricPlot3D. You can use ParametricPlot3D to plot a circle, however.
    – J. M. is somewhat okay.♦
    Oct 4 at 8:53












  • 1




    Circle is not compatible with ParametricPlot3D. You can use ParametricPlot3D to plot a circle, however.
    – J. M. is somewhat okay.♦
    Oct 4 at 8:53







1




1




Circle is not compatible with ParametricPlot3D. You can use ParametricPlot3D to plot a circle, however.
– J. M. is somewhat okay.♦
Oct 4 at 8:53




Circle is not compatible with ParametricPlot3D. You can use ParametricPlot3D to plot a circle, however.
– J. M. is somewhat okay.♦
Oct 4 at 8:53










2 Answers
2






active

oldest

votes

















up vote
4
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




















  • Please don't use JPG for non-photographic images! :)
    – Andreas Rejbrand
    Oct 4 at 11:19










  • @ Andreas Rejbrand Why not?
    – Alexei Boulbitch
    Oct 4 at 11:45










  • JPG is designed to be used with photographs, and it uses lossy compression that causes very disturbing artefacts in non-photographic images that contain a lot of solid-colour regions, text, curves, etc. I tried to explain this here, and there is also an XKCD for this: Google "XKCD PNG vs JPG". (Although, I must admit that I have almost never seen a JPG with as little artefacts as your image.)
    – Andreas Rejbrand
    Oct 4 at 11:58











  • @ Andreas Rejbrand Look, I always post jpg files here using the screenshots and it never makes problems.
    – Alexei Boulbitch
    Oct 4 at 12:18










  • No, indeed, you use so little compression that it is barely visible. But in almost all other cases where people save screenshots and diagrams as JPG, the artefacts are very visible. (Still, resaving your image as PNG reduces the file size by almost 50%.)
    – Andreas Rejbrand
    Oct 4 at 12:28

















up vote
4
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%2fhow-to-combine-2d-circle-graph-with-point-which-is-rounded-into-helix-3d-graph%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
    4
    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




















    • Please don't use JPG for non-photographic images! :)
      – Andreas Rejbrand
      Oct 4 at 11:19










    • @ Andreas Rejbrand Why not?
      – Alexei Boulbitch
      Oct 4 at 11:45










    • JPG is designed to be used with photographs, and it uses lossy compression that causes very disturbing artefacts in non-photographic images that contain a lot of solid-colour regions, text, curves, etc. I tried to explain this here, and there is also an XKCD for this: Google "XKCD PNG vs JPG". (Although, I must admit that I have almost never seen a JPG with as little artefacts as your image.)
      – Andreas Rejbrand
      Oct 4 at 11:58











    • @ Andreas Rejbrand Look, I always post jpg files here using the screenshots and it never makes problems.
      – Alexei Boulbitch
      Oct 4 at 12:18










    • No, indeed, you use so little compression that it is barely visible. But in almost all other cases where people save screenshots and diagrams as JPG, the artefacts are very visible. (Still, resaving your image as PNG reduces the file size by almost 50%.)
      – Andreas Rejbrand
      Oct 4 at 12:28














    up vote
    4
    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




















    • Please don't use JPG for non-photographic images! :)
      – Andreas Rejbrand
      Oct 4 at 11:19










    • @ Andreas Rejbrand Why not?
      – Alexei Boulbitch
      Oct 4 at 11:45










    • JPG is designed to be used with photographs, and it uses lossy compression that causes very disturbing artefacts in non-photographic images that contain a lot of solid-colour regions, text, curves, etc. I tried to explain this here, and there is also an XKCD for this: Google "XKCD PNG vs JPG". (Although, I must admit that I have almost never seen a JPG with as little artefacts as your image.)
      – Andreas Rejbrand
      Oct 4 at 11:58











    • @ Andreas Rejbrand Look, I always post jpg files here using the screenshots and it never makes problems.
      – Alexei Boulbitch
      Oct 4 at 12:18










    • No, indeed, you use so little compression that it is barely visible. But in almost all other cases where people save screenshots and diagrams as JPG, the artefacts are very visible. (Still, resaving your image as PNG reduces the file size by almost 50%.)
      – Andreas Rejbrand
      Oct 4 at 12:28












    up vote
    4
    down vote










    up vote
    4
    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 Oct 4 at 9:11









    Alexei Boulbitch

    20.5k2369




    20.5k2369











    • Please don't use JPG for non-photographic images! :)
      – Andreas Rejbrand
      Oct 4 at 11:19










    • @ Andreas Rejbrand Why not?
      – Alexei Boulbitch
      Oct 4 at 11:45










    • JPG is designed to be used with photographs, and it uses lossy compression that causes very disturbing artefacts in non-photographic images that contain a lot of solid-colour regions, text, curves, etc. I tried to explain this here, and there is also an XKCD for this: Google "XKCD PNG vs JPG". (Although, I must admit that I have almost never seen a JPG with as little artefacts as your image.)
      – Andreas Rejbrand
      Oct 4 at 11:58











    • @ Andreas Rejbrand Look, I always post jpg files here using the screenshots and it never makes problems.
      – Alexei Boulbitch
      Oct 4 at 12:18










    • No, indeed, you use so little compression that it is barely visible. But in almost all other cases where people save screenshots and diagrams as JPG, the artefacts are very visible. (Still, resaving your image as PNG reduces the file size by almost 50%.)
      – Andreas Rejbrand
      Oct 4 at 12:28
















    • Please don't use JPG for non-photographic images! :)
      – Andreas Rejbrand
      Oct 4 at 11:19










    • @ Andreas Rejbrand Why not?
      – Alexei Boulbitch
      Oct 4 at 11:45










    • JPG is designed to be used with photographs, and it uses lossy compression that causes very disturbing artefacts in non-photographic images that contain a lot of solid-colour regions, text, curves, etc. I tried to explain this here, and there is also an XKCD for this: Google "XKCD PNG vs JPG". (Although, I must admit that I have almost never seen a JPG with as little artefacts as your image.)
      – Andreas Rejbrand
      Oct 4 at 11:58











    • @ Andreas Rejbrand Look, I always post jpg files here using the screenshots and it never makes problems.
      – Alexei Boulbitch
      Oct 4 at 12:18










    • No, indeed, you use so little compression that it is barely visible. But in almost all other cases where people save screenshots and diagrams as JPG, the artefacts are very visible. (Still, resaving your image as PNG reduces the file size by almost 50%.)
      – Andreas Rejbrand
      Oct 4 at 12:28















    Please don't use JPG for non-photographic images! :)
    – Andreas Rejbrand
    Oct 4 at 11:19




    Please don't use JPG for non-photographic images! :)
    – Andreas Rejbrand
    Oct 4 at 11:19












    @ Andreas Rejbrand Why not?
    – Alexei Boulbitch
    Oct 4 at 11:45




    @ Andreas Rejbrand Why not?
    – Alexei Boulbitch
    Oct 4 at 11:45












    JPG is designed to be used with photographs, and it uses lossy compression that causes very disturbing artefacts in non-photographic images that contain a lot of solid-colour regions, text, curves, etc. I tried to explain this here, and there is also an XKCD for this: Google "XKCD PNG vs JPG". (Although, I must admit that I have almost never seen a JPG with as little artefacts as your image.)
    – Andreas Rejbrand
    Oct 4 at 11:58





    JPG is designed to be used with photographs, and it uses lossy compression that causes very disturbing artefacts in non-photographic images that contain a lot of solid-colour regions, text, curves, etc. I tried to explain this here, and there is also an XKCD for this: Google "XKCD PNG vs JPG". (Although, I must admit that I have almost never seen a JPG with as little artefacts as your image.)
    – Andreas Rejbrand
    Oct 4 at 11:58













    @ Andreas Rejbrand Look, I always post jpg files here using the screenshots and it never makes problems.
    – Alexei Boulbitch
    Oct 4 at 12:18




    @ Andreas Rejbrand Look, I always post jpg files here using the screenshots and it never makes problems.
    – Alexei Boulbitch
    Oct 4 at 12:18












    No, indeed, you use so little compression that it is barely visible. But in almost all other cases where people save screenshots and diagrams as JPG, the artefacts are very visible. (Still, resaving your image as PNG reduces the file size by almost 50%.)
    – Andreas Rejbrand
    Oct 4 at 12:28




    No, indeed, you use so little compression that it is barely visible. But in almost all other cases where people save screenshots and diagrams as JPG, the artefacts are very visible. (Still, resaving your image as PNG reduces the file size by almost 50%.)
    – Andreas Rejbrand
    Oct 4 at 12:28










    up vote
    4
    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
      4
      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
        4
        down vote










        up vote
        4
        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 Oct 4 at 9:16









        kglr

        164k8188388




        164k8188388




















            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%2fhow-to-combine-2d-circle-graph-with-point-which-is-rounded-into-helix-3d-graph%23new-answer', 'question_page');

            );

            Post as a guest
































































            -

            Popular posts from this blog

            How to check contact read email or not when send email to Individual?

            Image
            Clash Royale CLAN TAG #URR8PPP up vote 1 down vote favorite I'm using WordPress 4.9.8, CiviCRM to 5.5.1, I usually send email to contact by Search> Find contacts View contact details Action> Send email Send email ok, Contact received mail ok like picture But status only Email sent though contact read email or not. So, can CiviCRM can change status to Email read when contact read email? wordpress email share | improve this question asked Sep 26 at 0:12 ToanLuong 49 9 add a comment  |  up vote 1 down vote favorite I'm using WordPress 4.9.8, CiviCRM to 5.5.1, I usually send email to contact by Search> Find contacts View contact details Action> Send email Send email ok, Contact received mail ok like picture But status only Email sent though contact read email or not. So, can CiviCRM can change status to Email read when contact read email? wordpress email share | improve this questi...
            Read more

            Displaying single band from multi-band raster using QGIS

            Image
            Clash Royale CLAN TAG #URR8PPP 1 How can I extract a single band from multi-band raster in QGIS? I have an remote sensed image which has 6 bands (including NDVI band), I want to display each band separately, but have no idea how to do. I have seen some questions similar here but none worked for me. The original image (has 6 bands) is: I want to display the band 6 which should be like this: But I tried gdal_translate, and couldn't get the correct result. What I have got is: qgis raster multi-band share | improve this question edited Mar 5 at 0:53 Summer asked Mar 4 at 6:42 Summer Summer 23 6 Is this any help gis.stackexchange.com/questions/220658/… ? if not gis.stackexchange.com/questions/62133/… might help. – Michael Stimson Mar 4 at 6:46 Thanks for answering but when I used gdal_translate, qgis showed that 'Error 4: Kayena.tif: No such file or directory". Would you know how to fi...
            Read more

            How many registers does an x86_64 CPU actually have?

            Image
            Clash Royale CLAN TAG #URR8PPP up vote 2 down vote favorite I am currently learning reverse engineering and am studying the flags register. I had in my mind that rflags was just another name for one of the 16 general purpose registers, for example rax or rbx . But it looks like rflags is actually an additional register. So that makes 17 registers in total... how many more could there be? I have spent at least an hour on this and found numerous different answers. The best answer so far is this, which says that there are 40 registers in total. 16 General Purpose Registers 2 Status Registers 6 Code Segment Registers 16 SSE Registers 8 FPU/MMX Registers But if I add that up, I get 48. Could anybody provide an official answer on how many registers an x86_64 CPU has (e.g. an Intel i7). Additionally, I have seen references to 'hardware' and 'architectural' registers. What are those registers and how many are there? register x86-64 share | improve this...
            Read more