Visualize manifold specified by equalitiesHow to make a smooth revolution surface plotParametricPlot3D etc....

How do you catch Smeargle in Pokemon Go?

Existence of Riemann surface, holomorphic maps

"Starve to death" Vs. "Starve to the point of death"

Current across a wire with zero potential difference

Why zero tolerance on nudity in space?

What language shall they sing in?

Can you tell from a blurry photo if focus was too close or too far?

How to make ice magic work from a scientific point of view?

Is there any risk in sharing info about technologies and products we use with a supplier?

Removing whitespace between consecutive numbers

Why do neural networks need so many training examples to perform?

How do you funnel food off a cutting board?

What is the wife of a henpecked husband called?

Early credit roll before the end of the film

Why didn't Tom Riddle take the presence of Fawkes and the Sorting Hat as more of a threat?

Non-Cancer terminal illness that can affect young (age 10-13) girls?

Why does PHOTOREC keep finding files?

Separate environment for personal and development use under macOS

Can I announce prefix 161.117.25.0/24 even though I don't have all of /24 IPs

Building an exterior wall within an exterior wall for insulation

How to access internet and run apt-get through a middle server?

Why are the books in the Game of Thrones citadel library shelved spine inwards?

How to not let the Identify spell spoil everything?

Utilizing a Right and Left Outer Joins in same SELECT



Visualize manifold specified by equalities


How to make a smooth revolution surface plotParametricPlot3D etc. with parameters satisfying an implicit relationPlotting vectors and curves on a 3D surfacehow to get $n$ equidistributed points on the unit sphereUnattractive streaky rendering of Graphics3D imagesParametric Plot of FacesColor disparity in legend and graph due to opacityHow can I make a DensityPlot3D over a triangle?Problem with Manipulate after declaring pure function with HoldVoronoi mesh from non-parametric surfaces for 3D printing













4












$begingroup$


Suppose I have two nonlinear equalities $x^3 = y^2, y = z^3$. How can I visualize the manifold in $mathbb{R}^3$ that is generated by simultaneously satisfying the two equalities? I think ContourPlot3D is the one to use but I couldn't get it to work show the set of points in $mathbb{R}^3$ that satisfy the two equalities. The best I can do is make it show the intersection of the surfaces:



enter image description here



How can I plot the curve defined by the intersection in 3D?










share|improve this question









$endgroup$

















    4












    $begingroup$


    Suppose I have two nonlinear equalities $x^3 = y^2, y = z^3$. How can I visualize the manifold in $mathbb{R}^3$ that is generated by simultaneously satisfying the two equalities? I think ContourPlot3D is the one to use but I couldn't get it to work show the set of points in $mathbb{R}^3$ that satisfy the two equalities. The best I can do is make it show the intersection of the surfaces:



    enter image description here



    How can I plot the curve defined by the intersection in 3D?










    share|improve this question









    $endgroup$















      4












      4








      4





      $begingroup$


      Suppose I have two nonlinear equalities $x^3 = y^2, y = z^3$. How can I visualize the manifold in $mathbb{R}^3$ that is generated by simultaneously satisfying the two equalities? I think ContourPlot3D is the one to use but I couldn't get it to work show the set of points in $mathbb{R}^3$ that satisfy the two equalities. The best I can do is make it show the intersection of the surfaces:



      enter image description here



      How can I plot the curve defined by the intersection in 3D?










      share|improve this question









      $endgroup$




      Suppose I have two nonlinear equalities $x^3 = y^2, y = z^3$. How can I visualize the manifold in $mathbb{R}^3$ that is generated by simultaneously satisfying the two equalities? I think ContourPlot3D is the one to use but I couldn't get it to work show the set of points in $mathbb{R}^3$ that satisfy the two equalities. The best I can do is make it show the intersection of the surfaces:



      enter image description here



      How can I plot the curve defined by the intersection in 3D?







      graphics3d






      share|improve this question













      share|improve this question











      share|improve this question




      share|improve this question










      asked 50 mins ago









      ITAITA

      1575




      1575






















          2 Answers
          2






          active

          oldest

          votes


















          5












          $begingroup$

          You can use the option BoundaryStyle to mark the intersection of the two contour surfaces as follows:



          ContourPlot3D[{x^3 == y^2, y == z^3}, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, 
          Mesh -> None, ContourStyle -> Opacity[.3],
          BoundaryStyle -> {1 -> None, 2 -> None, {1, 2} -> Directive[Thick, Red]}]


          enter image description here



          Also



          SliceContourPlot3D[y - z^3,  x^3 == y^2, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, 
          Contours -> {{0}}, BoundaryStyle -> None, ContourShading -> None,
          ContourStyle -> Directive[Red, Thick]]


          enter image description here






          share|improve this answer











          $endgroup$













          • $begingroup$
            That's exactly what I needed. I follow most of it: Since a list was passed as first argument the '{1 -> None, 2-> None ... }' but how Mathematica knew to handle {1,2} -> is just magic!
            $endgroup$
            – ITA
            30 mins ago



















          4












          $begingroup$

          r = 1;
          R = ImplicitRegion[{x^3 == y^2, y == z^3}, {{x, -r, r}, {y, -r, r}, {z, -r, r}}];
          Region[R]





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


            }
            });














            draft saved

            draft discarded


















            StackExchange.ready(
            function () {
            StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f192273%2fvisualize-manifold-specified-by-equalities%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









            5












            $begingroup$

            You can use the option BoundaryStyle to mark the intersection of the two contour surfaces as follows:



            ContourPlot3D[{x^3 == y^2, y == z^3}, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, 
            Mesh -> None, ContourStyle -> Opacity[.3],
            BoundaryStyle -> {1 -> None, 2 -> None, {1, 2} -> Directive[Thick, Red]}]


            enter image description here



            Also



            SliceContourPlot3D[y - z^3,  x^3 == y^2, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, 
            Contours -> {{0}}, BoundaryStyle -> None, ContourShading -> None,
            ContourStyle -> Directive[Red, Thick]]


            enter image description here






            share|improve this answer











            $endgroup$













            • $begingroup$
              That's exactly what I needed. I follow most of it: Since a list was passed as first argument the '{1 -> None, 2-> None ... }' but how Mathematica knew to handle {1,2} -> is just magic!
              $endgroup$
              – ITA
              30 mins ago
















            5












            $begingroup$

            You can use the option BoundaryStyle to mark the intersection of the two contour surfaces as follows:



            ContourPlot3D[{x^3 == y^2, y == z^3}, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, 
            Mesh -> None, ContourStyle -> Opacity[.3],
            BoundaryStyle -> {1 -> None, 2 -> None, {1, 2} -> Directive[Thick, Red]}]


            enter image description here



            Also



            SliceContourPlot3D[y - z^3,  x^3 == y^2, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, 
            Contours -> {{0}}, BoundaryStyle -> None, ContourShading -> None,
            ContourStyle -> Directive[Red, Thick]]


            enter image description here






            share|improve this answer











            $endgroup$













            • $begingroup$
              That's exactly what I needed. I follow most of it: Since a list was passed as first argument the '{1 -> None, 2-> None ... }' but how Mathematica knew to handle {1,2} -> is just magic!
              $endgroup$
              – ITA
              30 mins ago














            5












            5








            5





            $begingroup$

            You can use the option BoundaryStyle to mark the intersection of the two contour surfaces as follows:



            ContourPlot3D[{x^3 == y^2, y == z^3}, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, 
            Mesh -> None, ContourStyle -> Opacity[.3],
            BoundaryStyle -> {1 -> None, 2 -> None, {1, 2} -> Directive[Thick, Red]}]


            enter image description here



            Also



            SliceContourPlot3D[y - z^3,  x^3 == y^2, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, 
            Contours -> {{0}}, BoundaryStyle -> None, ContourShading -> None,
            ContourStyle -> Directive[Red, Thick]]


            enter image description here






            share|improve this answer











            $endgroup$



            You can use the option BoundaryStyle to mark the intersection of the two contour surfaces as follows:



            ContourPlot3D[{x^3 == y^2, y == z^3}, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, 
            Mesh -> None, ContourStyle -> Opacity[.3],
            BoundaryStyle -> {1 -> None, 2 -> None, {1, 2} -> Directive[Thick, Red]}]


            enter image description here



            Also



            SliceContourPlot3D[y - z^3,  x^3 == y^2, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, 
            Contours -> {{0}}, BoundaryStyle -> None, ContourShading -> None,
            ContourStyle -> Directive[Red, Thick]]


            enter image description here







            share|improve this answer














            share|improve this answer



            share|improve this answer








            edited 29 mins ago

























            answered 41 mins ago









            kglrkglr

            186k10202421




            186k10202421












            • $begingroup$
              That's exactly what I needed. I follow most of it: Since a list was passed as first argument the '{1 -> None, 2-> None ... }' but how Mathematica knew to handle {1,2} -> is just magic!
              $endgroup$
              – ITA
              30 mins ago


















            • $begingroup$
              That's exactly what I needed. I follow most of it: Since a list was passed as first argument the '{1 -> None, 2-> None ... }' but how Mathematica knew to handle {1,2} -> is just magic!
              $endgroup$
              – ITA
              30 mins ago
















            $begingroup$
            That's exactly what I needed. I follow most of it: Since a list was passed as first argument the '{1 -> None, 2-> None ... }' but how Mathematica knew to handle {1,2} -> is just magic!
            $endgroup$
            – ITA
            30 mins ago




            $begingroup$
            That's exactly what I needed. I follow most of it: Since a list was passed as first argument the '{1 -> None, 2-> None ... }' but how Mathematica knew to handle {1,2} -> is just magic!
            $endgroup$
            – ITA
            30 mins ago











            4












            $begingroup$

            r = 1;
            R = ImplicitRegion[{x^3 == y^2, y == z^3}, {{x, -r, r}, {y, -r, r}, {z, -r, r}}];
            Region[R]





            share|improve this answer









            $endgroup$


















              4












              $begingroup$

              r = 1;
              R = ImplicitRegion[{x^3 == y^2, y == z^3}, {{x, -r, r}, {y, -r, r}, {z, -r, r}}];
              Region[R]





              share|improve this answer









              $endgroup$
















                4












                4








                4





                $begingroup$

                r = 1;
                R = ImplicitRegion[{x^3 == y^2, y == z^3}, {{x, -r, r}, {y, -r, r}, {z, -r, r}}];
                Region[R]





                share|improve this answer









                $endgroup$



                r = 1;
                R = ImplicitRegion[{x^3 == y^2, y == z^3}, {{x, -r, r}, {y, -r, r}, {z, -r, r}}];
                Region[R]






                share|improve this answer












                share|improve this answer



                share|improve this answer










                answered 39 mins ago









                Henrik SchumacherHenrik Schumacher

                55.1k475154




                55.1k475154






























                    draft saved

                    draft discarded




















































                    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%2f192273%2fvisualize-manifold-specified-by-equalities%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

                    IEEEtran - How to include ORCID in TeX/PDF with PdfLatexIs there a standard way to include ORCID in TeX /...

                    Cicindela nigrior Przypisy | Menu nawigacyjneCicindela varians unicolorManual for the Identification of the...

                    Glossaries-extra: Adding glossaries package to “Clas­sicTh­e­sis” template by Dr. André Miede v. 4.6 ...