Ploting curves of different orders of magnitudes on the same graph

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











up vote
3
down vote

favorite












I want to plot 



Plot[Exp[x],Sin[x],x,0,10]


The issue is that Sin[x] and Exp[x] are not of the same order of magnitude, so we do not see Sin[x]. Therefore, I would like to set different y-axis but on the same graph. For Exp[x], the y axis would go from 0 to 25000 and for Sin[x] from -1 to 1. How can I do that ?






plotting visualization







share|improve this question























  • Why do you need to plot curves with widely-varying ranges together?
    – J. M. is somewhat okay.♦
    3 hours ago






  • 1




    I have a case when I want to visualize the data and the log of the data. The curve is supposed to be an exponential at the beginning and vary linearly at the end. I want to see a linear evolution at the beginning with the log of the data, a linear evolution at the end with the data, and a transition area. I asked my question in a simple way, since the data is pretty big and that it's a general question
    – J.A
    3 hours ago










  • How about LogPlot?
    – Î‘λέξανδρος Ζεγγ
    42 mins ago














up vote
3
down vote

favorite












I want to plot 



Plot[Exp[x],Sin[x],x,0,10]


The issue is that Sin[x] and Exp[x] are not of the same order of magnitude, so we do not see Sin[x]. Therefore, I would like to set different y-axis but on the same graph. For Exp[x], the y axis would go from 0 to 25000 and for Sin[x] from -1 to 1. How can I do that ?






plotting visualization







share|improve this question























  • Why do you need to plot curves with widely-varying ranges together?
    – J. M. is somewhat okay.♦
    3 hours ago






  • 1




    I have a case when I want to visualize the data and the log of the data. The curve is supposed to be an exponential at the beginning and vary linearly at the end. I want to see a linear evolution at the beginning with the log of the data, a linear evolution at the end with the data, and a transition area. I asked my question in a simple way, since the data is pretty big and that it's a general question
    – J.A
    3 hours ago










  • How about LogPlot?
    – Î‘λέξανδρος Ζεγγ
    42 mins ago












up vote
3
down vote

favorite









up vote
3
down vote

favorite











I want to plot 



Plot[Exp[x],Sin[x],x,0,10]


The issue is that Sin[x] and Exp[x] are not of the same order of magnitude, so we do not see Sin[x]. Therefore, I would like to set different y-axis but on the same graph. For Exp[x], the y axis would go from 0 to 25000 and for Sin[x] from -1 to 1. How can I do that ?






plotting visualization







share|improve this question















I want to plot 



Plot[Exp[x],Sin[x],x,0,10]


The issue is that Sin[x] and Exp[x] are not of the same order of magnitude, so we do not see Sin[x]. Therefore, I would like to set different y-axis but on the same graph. For Exp[x], the y axis would go from 0 to 25000 and for Sin[x] from -1 to 1. How can I do that ?






plotting visualization




plotting visualization






share|improve this question















share|improve this question













share|improve this question




share|improve this question








edited 2 hours ago









kglr

164k8188388




164k8188388










asked 3 hours ago









J.A

1314




1314











  • Why do you need to plot curves with widely-varying ranges together?
    – J. M. is somewhat okay.♦
    3 hours ago






  • 1




    I have a case when I want to visualize the data and the log of the data. The curve is supposed to be an exponential at the beginning and vary linearly at the end. I want to see a linear evolution at the beginning with the log of the data, a linear evolution at the end with the data, and a transition area. I asked my question in a simple way, since the data is pretty big and that it's a general question
    – J.A
    3 hours ago










  • How about LogPlot?
    – Î‘λέξανδρος Ζεγγ
    42 mins ago
















  • Why do you need to plot curves with widely-varying ranges together?
    – J. M. is somewhat okay.♦
    3 hours ago






  • 1




    I have a case when I want to visualize the data and the log of the data. The curve is supposed to be an exponential at the beginning and vary linearly at the end. I want to see a linear evolution at the beginning with the log of the data, a linear evolution at the end with the data, and a transition area. I asked my question in a simple way, since the data is pretty big and that it's a general question
    – J.A
    3 hours ago










  • How about LogPlot?
    – Î‘λέξανδρος Ζεγγ
    42 mins ago















Why do you need to plot curves with widely-varying ranges together?
– J. M. is somewhat okay.♦
3 hours ago




Why do you need to plot curves with widely-varying ranges together?
– J. M. is somewhat okay.♦
3 hours ago




1




1




I have a case when I want to visualize the data and the log of the data. The curve is supposed to be an exponential at the beginning and vary linearly at the end. I want to see a linear evolution at the beginning with the log of the data, a linear evolution at the end with the data, and a transition area. I asked my question in a simple way, since the data is pretty big and that it's a general question
– J.A
3 hours ago




I have a case when I want to visualize the data and the log of the data. The curve is supposed to be an exponential at the beginning and vary linearly at the end. I want to see a linear evolution at the beginning with the log of the data, a linear evolution at the end with the data, and a transition area. I asked my question in a simple way, since the data is pretty big and that it's a general question
– J.A
3 hours ago












How about LogPlot?
– Î‘λέξανδρος Ζεγγ
42 mins ago




How about LogPlot?
– Î‘λέξανδρος Ζεγγ
42 mins ago










2 Answers
2






active

oldest

votes

















up vote
4
down vote













A slightly modified version using Overlay.



combine[data1_, data2_] := Overlay[ListLinePlot[data1,
 Frame -> True, True, False, False, 
 FrameLabel -> "x1", "y1", LabelStyle -> Directive[12, Blue], 
 PlotStyle -> Blue, PlotRange -> All, 
 ImagePadding -> 50, 50, 40, 40],
 ListLinePlot[data2, Frame -> False, False, True, True, 
 FrameTicks -> All, FrameLabel -> None, "y2", None, "x2", 
 LabelStyle -> Directive[12, Red], PlotStyle -> Red, Dashed, 
 PlotRange -> All, ImagePadding -> 50, 50, 40, 40], 
 Alignment -> Center]

data1 = Table[x, Sin[x], x, 0, 10, 0.01];
data2 = Table[x, Exp[x], x, -5, 5, 0.01];
combine[data1, data2]


enter image description here



One advantage here is that you can use any range for x and y.



You can use Plot as well in the combine and modify the appearance.






share|improve this answer





























    up vote
    1
    down vote













    Multiply, Sin[x] by, say, 1000 and rescale the right axis:



    Plot[Exp[x], 1000 Sin[x], x, 0, 10, Frame -> True, 
     FrameTicks -> Automatic, Charting`FindTicks[-1000, 1000, -1, 1], 
     Automatic, Automatic,
     PlotLegends -> "Expressions"]


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



      );













       

      draft saved


      draft discarded


















      StackExchange.ready(
      function ()
      StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f183357%2fploting-curves-of-different-orders-of-magnitudes-on-the-same-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













      A slightly modified version using Overlay.



      combine[data1_, data2_] := Overlay[ListLinePlot[data1,
       Frame -> True, True, False, False, 
       FrameLabel -> "x1", "y1", LabelStyle -> Directive[12, Blue], 
       PlotStyle -> Blue, PlotRange -> All, 
       ImagePadding -> 50, 50, 40, 40],
       ListLinePlot[data2, Frame -> False, False, True, True, 
       FrameTicks -> All, FrameLabel -> None, "y2", None, "x2", 
       LabelStyle -> Directive[12, Red], PlotStyle -> Red, Dashed, 
       PlotRange -> All, ImagePadding -> 50, 50, 40, 40], 
       Alignment -> Center]

      data1 = Table[x, Sin[x], x, 0, 10, 0.01];
      data2 = Table[x, Exp[x], x, -5, 5, 0.01];
      combine[data1, data2]


      enter image description here



      One advantage here is that you can use any range for x and y.



      You can use Plot as well in the combine and modify the appearance.






      share|improve this answer


























        up vote
        4
        down vote













        A slightly modified version using Overlay.



        combine[data1_, data2_] := Overlay[ListLinePlot[data1,
         Frame -> True, True, False, False, 
         FrameLabel -> "x1", "y1", LabelStyle -> Directive[12, Blue], 
         PlotStyle -> Blue, PlotRange -> All, 
         ImagePadding -> 50, 50, 40, 40],
         ListLinePlot[data2, Frame -> False, False, True, True, 
         FrameTicks -> All, FrameLabel -> None, "y2", None, "x2", 
         LabelStyle -> Directive[12, Red], PlotStyle -> Red, Dashed, 
         PlotRange -> All, ImagePadding -> 50, 50, 40, 40], 
         Alignment -> Center]

        data1 = Table[x, Sin[x], x, 0, 10, 0.01];
        data2 = Table[x, Exp[x], x, -5, 5, 0.01];
        combine[data1, data2]


        enter image description here



        One advantage here is that you can use any range for x and y.



        You can use Plot as well in the combine and modify the appearance.






        share|improve this answer
























          up vote
          4
          down vote










          up vote
          4
          down vote









          A slightly modified version using Overlay.



          combine[data1_, data2_] := Overlay[ListLinePlot[data1,
           Frame -> True, True, False, False, 
           FrameLabel -> "x1", "y1", LabelStyle -> Directive[12, Blue], 
           PlotStyle -> Blue, PlotRange -> All, 
           ImagePadding -> 50, 50, 40, 40],
           ListLinePlot[data2, Frame -> False, False, True, True, 
           FrameTicks -> All, FrameLabel -> None, "y2", None, "x2", 
           LabelStyle -> Directive[12, Red], PlotStyle -> Red, Dashed, 
           PlotRange -> All, ImagePadding -> 50, 50, 40, 40], 
           Alignment -> Center]

          data1 = Table[x, Sin[x], x, 0, 10, 0.01];
          data2 = Table[x, Exp[x], x, -5, 5, 0.01];
          combine[data1, data2]


          enter image description here



          One advantage here is that you can use any range for x and y.



          You can use Plot as well in the combine and modify the appearance.






          share|improve this answer














          A slightly modified version using Overlay.



          combine[data1_, data2_] := Overlay[ListLinePlot[data1,
           Frame -> True, True, False, False, 
           FrameLabel -> "x1", "y1", LabelStyle -> Directive[12, Blue], 
           PlotStyle -> Blue, PlotRange -> All, 
           ImagePadding -> 50, 50, 40, 40],
           ListLinePlot[data2, Frame -> False, False, True, True, 
           FrameTicks -> All, FrameLabel -> None, "y2", None, "x2", 
           LabelStyle -> Directive[12, Red], PlotStyle -> Red, Dashed, 
           PlotRange -> All, ImagePadding -> 50, 50, 40, 40], 
           Alignment -> Center]

          data1 = Table[x, Sin[x], x, 0, 10, 0.01];
          data2 = Table[x, Exp[x], x, -5, 5, 0.01];
          combine[data1, data2]


          enter image description here



          One advantage here is that you can use any range for x and y.



          You can use Plot as well in the combine and modify the appearance.







          share|improve this answer














          share|improve this answer



          share|improve this answer








          edited 48 mins ago

























          answered 1 hour ago









          Sumit

          11.4k21854




          11.4k21854




















              up vote
              1
              down vote













              Multiply, Sin[x] by, say, 1000 and rescale the right axis:



              Plot[Exp[x], 1000 Sin[x], x, 0, 10, Frame -> True, 
               FrameTicks -> Automatic, Charting`FindTicks[-1000, 1000, -1, 1], 
               Automatic, Automatic,
               PlotLegends -> "Expressions"]


              enter image description here






              share|improve this answer


























                up vote
                1
                down vote













                Multiply, Sin[x] by, say, 1000 and rescale the right axis:



                Plot[Exp[x], 1000 Sin[x], x, 0, 10, Frame -> True, 
                 FrameTicks -> Automatic, Charting`FindTicks[-1000, 1000, -1, 1], 
                 Automatic, Automatic,
                 PlotLegends -> "Expressions"]


                enter image description here






                share|improve this answer
























                  up vote
                  1
                  down vote










                  up vote
                  1
                  down vote









                  Multiply, Sin[x] by, say, 1000 and rescale the right axis:



                  Plot[Exp[x], 1000 Sin[x], x, 0, 10, Frame -> True, 
                   FrameTicks -> Automatic, Charting`FindTicks[-1000, 1000, -1, 1], 
                   Automatic, Automatic,
                   PlotLegends -> "Expressions"]


                  enter image description here






                  share|improve this answer














                  Multiply, Sin[x] by, say, 1000 and rescale the right axis:



                  Plot[Exp[x], 1000 Sin[x], x, 0, 10, Frame -> True, 
                   FrameTicks -> Automatic, Charting`FindTicks[-1000, 1000, -1, 1], 
                   Automatic, Automatic,
                   PlotLegends -> "Expressions"]


                  enter image description here







                  share|improve this answer














                  share|improve this answer



                  share|improve this answer








                  edited 3 hours ago

























                  answered 3 hours ago









                  kglr

                  164k8188388




                  164k8188388



























                       

                      draft saved


                      draft discarded















































                       


                      draft saved


                      draft discarded














                      StackExchange.ready(
                      function ()
                      StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f183357%2fploting-curves-of-different-orders-of-magnitudes-on-the-same-graph%23new-answer', 'question_page');

                      );

                      Post as a guest
































































                      Comments

                      Post a Comment

                      Popular posts from this blog

                      What does second last employer means? [closed]

                      Image
                      Clash Royale CLAN TAG #URR8PPP .everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty margin-bottom:0; up vote -3 down vote favorite Say, for example I have worked in the following companies, Company A => 2010 - 2011 Company B => 2011 - 2012 Company C => 2012 - Till Date Company D => Have offer Now assume Company D is asking to submit documents from my second last employer. So from the list of companies given, which company would be qualified as second last employer? software-industry employer share | improve this question asked Aug 10 '14 at 5:16 Rajaprabhu Aravindasamy 559 1 6 13 closed as off-topic by Jim G., jmort253 ♦ Aug 11 '14 at 1:58 This question appears to be off-topic. The users who voted to close gave this specific reason: "Questions seeking advice on company-specific regulations, agreements, or policies should be directed to your manager or HR department. Questions that address...
                      Read more

                      List of Gilmore Girls characters

                      Image
                      The season three cast—(Back row): Lane, Michel, Paris, Emily, Richard, Sookie, Miss Patty, Kirk; Front row: Jess, Luke, Lorelai, Rory, Dean This is a list of characters for the comedy-drama television series Gilmore Girls . Contents 1 Main characters 1.1 Lorelai Gilmore 1.2 Rory Gilmore 1.3 Sookie St. James 1.4 Lane Kim 1.5 Michel Gerard 1.6 Luke Danes 1.7 Emily Gilmore 1.8 Richard Gilmore 1.9 Paris Geller 1.10 Dean Forester 1.11 Jess Mariano 1.12 Kirk Gleason 1.13 Jason Stiles 1.14 Logan Huntzberger 2 Major recurring characters 2.1 Christopher Hayden 2.2 Jackson Belleville 2.3 Mrs. Kim 2.4 Tristin DuGray 2.5 Max Medina 2.6 Taylor Doose 2.7 Dave Rygalski 2.8 Marty 3 Recurring characters 3.1 Stars Hollow 3.2 Chilton 3.3 Yale 3.4 Other 4 Notable guest stars 5 Unseen characters 6 Notes 7 References Main characters Actor Character Appearances Season 1 Season 2 Season 3 Season 4 Season 5 Season 6 Season 7 A Year in the Life Lauren Graham Lorelai Gilmore...
                      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