PlotLabels with equations not expressions












3












$begingroup$


I want to label the curves in Plot with their equations (eg. "y = x^2") not just their expressions (eg. x^2). There has to be a way to do this, but I cannot figure it out.



shadeBoundedRegion[top_, bottom_, a_, b_]:= Plot[{Max[top, bottom], top, bottom}, {x,a,b}, Filling -> {3 -> {1}}, PlotLabels->{"" ,Above,Above}];
shadeBoundedRegion[4,x^2,-3,3]


I apologize if this has been answered elsewhere, but I could not find it.










share|improve this question







New contributor




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


    I want to label the curves in Plot with their equations (eg. "y = x^2") not just their expressions (eg. x^2). There has to be a way to do this, but I cannot figure it out.



    shadeBoundedRegion[top_, bottom_, a_, b_]:= Plot[{Max[top, bottom], top, bottom}, {x,a,b}, Filling -> {3 -> {1}}, PlotLabels->{"" ,Above,Above}];
    shadeBoundedRegion[4,x^2,-3,3]


    I apologize if this has been answered elsewhere, but I could not find it.










    share|improve this question







    New contributor




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


      I want to label the curves in Plot with their equations (eg. "y = x^2") not just their expressions (eg. x^2). There has to be a way to do this, but I cannot figure it out.



      shadeBoundedRegion[top_, bottom_, a_, b_]:= Plot[{Max[top, bottom], top, bottom}, {x,a,b}, Filling -> {3 -> {1}}, PlotLabels->{"" ,Above,Above}];
      shadeBoundedRegion[4,x^2,-3,3]


      I apologize if this has been answered elsewhere, but I could not find it.










      share|improve this question







      New contributor




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







      $endgroup$




      I want to label the curves in Plot with their equations (eg. "y = x^2") not just their expressions (eg. x^2). There has to be a way to do this, but I cannot figure it out.



      shadeBoundedRegion[top_, bottom_, a_, b_]:= Plot[{Max[top, bottom], top, bottom}, {x,a,b}, Filling -> {3 -> {1}}, PlotLabels->{"" ,Above,Above}];
      shadeBoundedRegion[4,x^2,-3,3]


      I apologize if this has been answered elsewhere, but I could not find it.







      plotting






      share|improve this question







      New contributor




      tretz 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




      tretz 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




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









      asked 7 hours ago









      tretztretz

      161




      161




      New contributor




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





      New contributor





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






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






















          1 Answer
          1






          active

          oldest

          votes


















          6












          $begingroup$

          Use PlotLabels -> {"", HoldForm[y = top], HoldForm[y = bottom]} in the definition of shadeBoundedRegion:



          shadeBoundedRegion[top_, bottom_, a_, b_] :=  Plot[{Max[top, bottom], top, bottom}, 
          {x, a, b},
          Filling -> {3 -> {1}},
          PlotLabels -> {"", HoldForm[y = top], HoldForm[y = bottom]}];

          shadeBoundedRegion[4, x^2, -3, 3]


          enter image description here






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


            }
            });






            tretz 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%2f193285%2fplotlabels-with-equations-not-expressions%23new-answer', 'question_page');
            }
            );

            Post as a guest















            Required, but never shown

























            1 Answer
            1






            active

            oldest

            votes








            1 Answer
            1






            active

            oldest

            votes









            active

            oldest

            votes






            active

            oldest

            votes









            6












            $begingroup$

            Use PlotLabels -> {"", HoldForm[y = top], HoldForm[y = bottom]} in the definition of shadeBoundedRegion:



            shadeBoundedRegion[top_, bottom_, a_, b_] :=  Plot[{Max[top, bottom], top, bottom}, 
            {x, a, b},
            Filling -> {3 -> {1}},
            PlotLabels -> {"", HoldForm[y = top], HoldForm[y = bottom]}];

            shadeBoundedRegion[4, x^2, -3, 3]


            enter image description here






            share|improve this answer











            $endgroup$


















              6












              $begingroup$

              Use PlotLabels -> {"", HoldForm[y = top], HoldForm[y = bottom]} in the definition of shadeBoundedRegion:



              shadeBoundedRegion[top_, bottom_, a_, b_] :=  Plot[{Max[top, bottom], top, bottom}, 
              {x, a, b},
              Filling -> {3 -> {1}},
              PlotLabels -> {"", HoldForm[y = top], HoldForm[y = bottom]}];

              shadeBoundedRegion[4, x^2, -3, 3]


              enter image description here






              share|improve this answer











              $endgroup$
















                6












                6








                6





                $begingroup$

                Use PlotLabels -> {"", HoldForm[y = top], HoldForm[y = bottom]} in the definition of shadeBoundedRegion:



                shadeBoundedRegion[top_, bottom_, a_, b_] :=  Plot[{Max[top, bottom], top, bottom}, 
                {x, a, b},
                Filling -> {3 -> {1}},
                PlotLabels -> {"", HoldForm[y = top], HoldForm[y = bottom]}];

                shadeBoundedRegion[4, x^2, -3, 3]


                enter image description here






                share|improve this answer











                $endgroup$



                Use PlotLabels -> {"", HoldForm[y = top], HoldForm[y = bottom]} in the definition of shadeBoundedRegion:



                shadeBoundedRegion[top_, bottom_, a_, b_] :=  Plot[{Max[top, bottom], top, bottom}, 
                {x, a, b},
                Filling -> {3 -> {1}},
                PlotLabels -> {"", HoldForm[y = top], HoldForm[y = bottom]}];

                shadeBoundedRegion[4, x^2, -3, 3]


                enter image description here







                share|improve this answer














                share|improve this answer



                share|improve this answer








                edited 14 mins ago

























                answered 7 hours ago









                kglrkglr

                189k10205422




                189k10205422






















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










                    draft saved

                    draft discarded


















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













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












                    tretz 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%2f193285%2fplotlabels-with-equations-not-expressions%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

                    How to make a Squid Proxy server?

                    Is this a new Fibonacci Identity?

                    Touch on Surface Book