Using `PlotLegends` with a `ColorFunction`Using PlotLegendsPlotLegends questionChange the legend labels' font when PlotLegends is AutomaticHow to simulate Placed in workaround for PlotLegends ParametricPlot bug?Piecewise ColorFunction for Plot3DHow to prevent ColorFunction from blending colors between points on a ListLinePlotListPlot with different color optionsMake Legend dot largerCommon legend for two density plotsColorFunction ranges for SphericalPlot3D

What specific instant in time in the MCU has been depicted the most times?

LED glows slightly during soldering

Why isn't pressure filtration popular compared to vacuum filtration?

Is it unbalanced to allow a monk with the Tavern Brawler feat to use improvised weapons as monk weapons?

Is it possible to create a craft with specific bones, like the bones of a forgotten beast?

Is there a strong legal guarantee that the U.S. can give to another country that it won't attack them?

Why weren't bootable game disks ever common on the IBM PC?

How can a dictatorship government be beneficial to a dictator in a post-scarcity society?

Great Unsolved Problems in O.R

Is a request to book a business flight ticket for a graduate student an unreasonable one?

How to deal with moral/legal subjects in writing?

Are there any sports for which the world's best player is female?

Why was hardware diversification an asset for the IBM PC ecosystem?

Would dual wielding daggers be a viable choice for a covert bodyguard?

Confirming the Identity of a (Friendly) Reviewer After the Reviews

Received a dinner invitation through my employer's email, is it ok to attend?

How to memorize multiple pieces?

Fivenum and a little bit

Graduate student with abysmal English writing skills, how to help

How can I fix the dull colors I am getting in Ubuntu 19.04 Terminal?

Why is the air gap between the stator and rotor on a motor kept as small as it is?

Why didn't Thanos kill all the Dwarves on Nidavellir?

Why is the ladder of the LM always in the dark side of the LM?

Are there any medieval light sources without fire?



Using `PlotLegends` with a `ColorFunction`


Using PlotLegendsPlotLegends questionChange the legend labels' font when PlotLegends is AutomaticHow to simulate Placed in workaround for PlotLegends ParametricPlot bug?Piecewise ColorFunction for Plot3DHow to prevent ColorFunction from blending colors between points on a ListLinePlotListPlot with different color optionsMake Legend dot largerCommon legend for two density plotsColorFunction ranges for SphericalPlot3D






.everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty margin-bottom:0;








3












$begingroup$


Is there a way to put a legend mark with a color function rainbow?



For example:



legend2 = 
Grid[Graphics[Red, Thick, Line[0, 0, 2, 0],
ImageSize -> 5], "u"]
u[x_] := x
Plot[u[x], x, 0, 1, ColorFunction -> "Rainbow",
PlotLegends -> Placed[legend2, 1.05, 0.5, 0, 0.5]]


enter image description here



In this case the plot marker is red. Is there a way to put a rainbow scale like the function?










share|improve this question









$endgroup$











  • $begingroup$
    I don't want a bar. I want a line (like the image) but instead the color red, a rainbow color.
    $endgroup$
    – Mateus
    7 hours ago

















3












$begingroup$


Is there a way to put a legend mark with a color function rainbow?



For example:



legend2 = 
Grid[Graphics[Red, Thick, Line[0, 0, 2, 0],
ImageSize -> 5], "u"]
u[x_] := x
Plot[u[x], x, 0, 1, ColorFunction -> "Rainbow",
PlotLegends -> Placed[legend2, 1.05, 0.5, 0, 0.5]]


enter image description here



In this case the plot marker is red. Is there a way to put a rainbow scale like the function?










share|improve this question









$endgroup$











  • $begingroup$
    I don't want a bar. I want a line (like the image) but instead the color red, a rainbow color.
    $endgroup$
    – Mateus
    7 hours ago













3












3








3


1



$begingroup$


Is there a way to put a legend mark with a color function rainbow?



For example:



legend2 = 
Grid[Graphics[Red, Thick, Line[0, 0, 2, 0],
ImageSize -> 5], "u"]
u[x_] := x
Plot[u[x], x, 0, 1, ColorFunction -> "Rainbow",
PlotLegends -> Placed[legend2, 1.05, 0.5, 0, 0.5]]


enter image description here



In this case the plot marker is red. Is there a way to put a rainbow scale like the function?










share|improve this question









$endgroup$




Is there a way to put a legend mark with a color function rainbow?



For example:



legend2 = 
Grid[Graphics[Red, Thick, Line[0, 0, 2, 0],
ImageSize -> 5], "u"]
u[x_] := x
Plot[u[x], x, 0, 1, ColorFunction -> "Rainbow",
PlotLegends -> Placed[legend2, 1.05, 0.5, 0, 0.5]]


enter image description here



In this case the plot marker is red. Is there a way to put a rainbow scale like the function?







plotting legending






share|improve this question













share|improve this question











share|improve this question




share|improve this question










asked 9 hours ago









MateusMateus

6241 silver badge7 bronze badges




6241 silver badge7 bronze badges











  • $begingroup$
    I don't want a bar. I want a line (like the image) but instead the color red, a rainbow color.
    $endgroup$
    – Mateus
    7 hours ago
















  • $begingroup$
    I don't want a bar. I want a line (like the image) but instead the color red, a rainbow color.
    $endgroup$
    – Mateus
    7 hours ago















$begingroup$
I don't want a bar. I want a line (like the image) but instead the color red, a rainbow color.
$endgroup$
– Mateus
7 hours ago




$begingroup$
I don't want a bar. I want a line (like the image) but instead the color red, a rainbow color.
$endgroup$
– Mateus
7 hours ago










2 Answers
2






active

oldest

votes


















4












$begingroup$

u[x_] := x
sparkline = Plot[0, x, 0, 1,
ColorFunction -> (ColorData[ "Rainbow"][#] &),
PlotStyle -> Thick,
PlotTheme -> "Sparkline", Axes -> False];

Plot[u[x], x, 0, 1,
ColorFunction -> "Rainbow",
PlotStyle -> Thick,
PlotLegends -> Labeled[sparkline, "u", Right]]


enter image description here



An alternative ways is to use sparkline with the (undocumented) option "LegendItem" inside LineLegend:



Plot[u[x], x, 0, 1, 
ColorFunction -> "Rainbow",
PlotStyle -> Thick,
PlotLegends -> LineLegend[Automatic, u, "LegendItem" -> sparkline]]


enter image description here



Variations on the same idea:



colorfunctions = "Rainbow", "SolarColors";
functions = Sin[x], Cos[x];

sparklines = MapThread[Plot[#, x, 0, 2 Pi,
ColorFunction -> #2, PlotStyle -> Thick,
PlotTheme -> "Sparkline", Axes -> False] &,
functions, colorfunctions];

Show[MapThread[Plot[#, x, 0, 2 Pi,
ColorFunction -> #2, PlotStyle -> Thick,
PlotLegends -> LineLegend[Automatic, TraditionalForm @ #,
"LegendItem" -> #3, LegendMarkerSize -> Large]] &,
functions, colorfunctions, sparklines]]


enter image description here






share|improve this answer











$endgroup$




















    2












    $begingroup$

    You can use LegendLayout to modify the Line[] in LineLegend:



    ClearAll[cfline];
    cfline[cf_String] := cfline[ColorData@cf];
    cfline[cf_][pairs_] := Grid[
    pairs /.
    Line[a_, b_] :>
    Line[Subdivide[a, b, 20],
    VertexColors -> cf /@ Subdivide[0., 1., 20]]
    ];

    Plot[u[x], x, 0, 4,
    ColorFunction -> "Rainbow",
    PlotLegends -> LineLegend["Expressions", LegendLayout -> cfline@"Rainbow"]]


    enter image description here






    share|improve this answer









    $endgroup$















      Your Answer








      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%2f201821%2fusing-plotlegends-with-a-colorfunction%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









      4












      $begingroup$

      u[x_] := x
      sparkline = Plot[0, x, 0, 1,
      ColorFunction -> (ColorData[ "Rainbow"][#] &),
      PlotStyle -> Thick,
      PlotTheme -> "Sparkline", Axes -> False];

      Plot[u[x], x, 0, 1,
      ColorFunction -> "Rainbow",
      PlotStyle -> Thick,
      PlotLegends -> Labeled[sparkline, "u", Right]]


      enter image description here



      An alternative ways is to use sparkline with the (undocumented) option "LegendItem" inside LineLegend:



      Plot[u[x], x, 0, 1, 
      ColorFunction -> "Rainbow",
      PlotStyle -> Thick,
      PlotLegends -> LineLegend[Automatic, u, "LegendItem" -> sparkline]]


      enter image description here



      Variations on the same idea:



      colorfunctions = "Rainbow", "SolarColors";
      functions = Sin[x], Cos[x];

      sparklines = MapThread[Plot[#, x, 0, 2 Pi,
      ColorFunction -> #2, PlotStyle -> Thick,
      PlotTheme -> "Sparkline", Axes -> False] &,
      functions, colorfunctions];

      Show[MapThread[Plot[#, x, 0, 2 Pi,
      ColorFunction -> #2, PlotStyle -> Thick,
      PlotLegends -> LineLegend[Automatic, TraditionalForm @ #,
      "LegendItem" -> #3, LegendMarkerSize -> Large]] &,
      functions, colorfunctions, sparklines]]


      enter image description here






      share|improve this answer











      $endgroup$

















        4












        $begingroup$

        u[x_] := x
        sparkline = Plot[0, x, 0, 1,
        ColorFunction -> (ColorData[ "Rainbow"][#] &),
        PlotStyle -> Thick,
        PlotTheme -> "Sparkline", Axes -> False];

        Plot[u[x], x, 0, 1,
        ColorFunction -> "Rainbow",
        PlotStyle -> Thick,
        PlotLegends -> Labeled[sparkline, "u", Right]]


        enter image description here



        An alternative ways is to use sparkline with the (undocumented) option "LegendItem" inside LineLegend:



        Plot[u[x], x, 0, 1, 
        ColorFunction -> "Rainbow",
        PlotStyle -> Thick,
        PlotLegends -> LineLegend[Automatic, u, "LegendItem" -> sparkline]]


        enter image description here



        Variations on the same idea:



        colorfunctions = "Rainbow", "SolarColors";
        functions = Sin[x], Cos[x];

        sparklines = MapThread[Plot[#, x, 0, 2 Pi,
        ColorFunction -> #2, PlotStyle -> Thick,
        PlotTheme -> "Sparkline", Axes -> False] &,
        functions, colorfunctions];

        Show[MapThread[Plot[#, x, 0, 2 Pi,
        ColorFunction -> #2, PlotStyle -> Thick,
        PlotLegends -> LineLegend[Automatic, TraditionalForm @ #,
        "LegendItem" -> #3, LegendMarkerSize -> Large]] &,
        functions, colorfunctions, sparklines]]


        enter image description here






        share|improve this answer











        $endgroup$















          4












          4








          4





          $begingroup$

          u[x_] := x
          sparkline = Plot[0, x, 0, 1,
          ColorFunction -> (ColorData[ "Rainbow"][#] &),
          PlotStyle -> Thick,
          PlotTheme -> "Sparkline", Axes -> False];

          Plot[u[x], x, 0, 1,
          ColorFunction -> "Rainbow",
          PlotStyle -> Thick,
          PlotLegends -> Labeled[sparkline, "u", Right]]


          enter image description here



          An alternative ways is to use sparkline with the (undocumented) option "LegendItem" inside LineLegend:



          Plot[u[x], x, 0, 1, 
          ColorFunction -> "Rainbow",
          PlotStyle -> Thick,
          PlotLegends -> LineLegend[Automatic, u, "LegendItem" -> sparkline]]


          enter image description here



          Variations on the same idea:



          colorfunctions = "Rainbow", "SolarColors";
          functions = Sin[x], Cos[x];

          sparklines = MapThread[Plot[#, x, 0, 2 Pi,
          ColorFunction -> #2, PlotStyle -> Thick,
          PlotTheme -> "Sparkline", Axes -> False] &,
          functions, colorfunctions];

          Show[MapThread[Plot[#, x, 0, 2 Pi,
          ColorFunction -> #2, PlotStyle -> Thick,
          PlotLegends -> LineLegend[Automatic, TraditionalForm @ #,
          "LegendItem" -> #3, LegendMarkerSize -> Large]] &,
          functions, colorfunctions, sparklines]]


          enter image description here






          share|improve this answer











          $endgroup$



          u[x_] := x
          sparkline = Plot[0, x, 0, 1,
          ColorFunction -> (ColorData[ "Rainbow"][#] &),
          PlotStyle -> Thick,
          PlotTheme -> "Sparkline", Axes -> False];

          Plot[u[x], x, 0, 1,
          ColorFunction -> "Rainbow",
          PlotStyle -> Thick,
          PlotLegends -> Labeled[sparkline, "u", Right]]


          enter image description here



          An alternative ways is to use sparkline with the (undocumented) option "LegendItem" inside LineLegend:



          Plot[u[x], x, 0, 1, 
          ColorFunction -> "Rainbow",
          PlotStyle -> Thick,
          PlotLegends -> LineLegend[Automatic, u, "LegendItem" -> sparkline]]


          enter image description here



          Variations on the same idea:



          colorfunctions = "Rainbow", "SolarColors";
          functions = Sin[x], Cos[x];

          sparklines = MapThread[Plot[#, x, 0, 2 Pi,
          ColorFunction -> #2, PlotStyle -> Thick,
          PlotTheme -> "Sparkline", Axes -> False] &,
          functions, colorfunctions];

          Show[MapThread[Plot[#, x, 0, 2 Pi,
          ColorFunction -> #2, PlotStyle -> Thick,
          PlotLegends -> LineLegend[Automatic, TraditionalForm @ #,
          "LegendItem" -> #3, LegendMarkerSize -> Large]] &,
          functions, colorfunctions, sparklines]]


          enter image description here







          share|improve this answer














          share|improve this answer



          share|improve this answer








          edited 5 hours ago

























          answered 7 hours ago









          kglrkglr

          204k10 gold badges233 silver badges463 bronze badges




          204k10 gold badges233 silver badges463 bronze badges























              2












              $begingroup$

              You can use LegendLayout to modify the Line[] in LineLegend:



              ClearAll[cfline];
              cfline[cf_String] := cfline[ColorData@cf];
              cfline[cf_][pairs_] := Grid[
              pairs /.
              Line[a_, b_] :>
              Line[Subdivide[a, b, 20],
              VertexColors -> cf /@ Subdivide[0., 1., 20]]
              ];

              Plot[u[x], x, 0, 4,
              ColorFunction -> "Rainbow",
              PlotLegends -> LineLegend["Expressions", LegendLayout -> cfline@"Rainbow"]]


              enter image description here






              share|improve this answer









              $endgroup$

















                2












                $begingroup$

                You can use LegendLayout to modify the Line[] in LineLegend:



                ClearAll[cfline];
                cfline[cf_String] := cfline[ColorData@cf];
                cfline[cf_][pairs_] := Grid[
                pairs /.
                Line[a_, b_] :>
                Line[Subdivide[a, b, 20],
                VertexColors -> cf /@ Subdivide[0., 1., 20]]
                ];

                Plot[u[x], x, 0, 4,
                ColorFunction -> "Rainbow",
                PlotLegends -> LineLegend["Expressions", LegendLayout -> cfline@"Rainbow"]]


                enter image description here






                share|improve this answer









                $endgroup$















                  2












                  2








                  2





                  $begingroup$

                  You can use LegendLayout to modify the Line[] in LineLegend:



                  ClearAll[cfline];
                  cfline[cf_String] := cfline[ColorData@cf];
                  cfline[cf_][pairs_] := Grid[
                  pairs /.
                  Line[a_, b_] :>
                  Line[Subdivide[a, b, 20],
                  VertexColors -> cf /@ Subdivide[0., 1., 20]]
                  ];

                  Plot[u[x], x, 0, 4,
                  ColorFunction -> "Rainbow",
                  PlotLegends -> LineLegend["Expressions", LegendLayout -> cfline@"Rainbow"]]


                  enter image description here






                  share|improve this answer









                  $endgroup$



                  You can use LegendLayout to modify the Line[] in LineLegend:



                  ClearAll[cfline];
                  cfline[cf_String] := cfline[ColorData@cf];
                  cfline[cf_][pairs_] := Grid[
                  pairs /.
                  Line[a_, b_] :>
                  Line[Subdivide[a, b, 20],
                  VertexColors -> cf /@ Subdivide[0., 1., 20]]
                  ];

                  Plot[u[x], x, 0, 4,
                  ColorFunction -> "Rainbow",
                  PlotLegends -> LineLegend["Expressions", LegendLayout -> cfline@"Rainbow"]]


                  enter image description here







                  share|improve this answer












                  share|improve this answer



                  share|improve this answer










                  answered 5 hours ago









                  Michael E2Michael E2

                  155k12 gold badges213 silver badges502 bronze badges




                  155k12 gold badges213 silver badges502 bronze badges



























                      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%2f201821%2fusing-plotlegends-with-a-colorfunction%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

                      Invision Community Contents History See also References External links Navigation menuProprietaryinvisioncommunity.comIPS Community ForumsIPS Community Forumsthis blog entry"License Changes, IP.Board 3.4, and the Future""Interview -- Matt Mecham of Ibforums""CEO Invision Power Board, Matt Mecham Is a Liar, Thief!"IPB License Explanation 1.3, 1.3.1, 2.0, and 2.1ArchivedSecurity Fixes, Updates And Enhancements For IPB 1.3.1Archived"New Demo Accounts - Invision Power Services"the original"New Default Skin"the original"Invision Power Board 3.0.0 and Applications Released"the original"Archived copy"the original"Perpetual licenses being done away with""Release Notes - Invision Power Services""Introducing: IPS Community Suite 4!"Invision Community Release Notes

                      Canceling a color specificationRandomly assigning color to Graphics3D objects?Default color for Filling in Mathematica 9Coloring specific elements of sets with a prime modified order in an array plotHow to pick a color differing significantly from the colors already in a given color list?Detection of the text colorColor numbers based on their valueCan color schemes for use with ColorData include opacity specification?My dynamic color schemes

                      Tom Holland Mục lục Đầu đời và giáo dục | Sự nghiệp | Cuộc sống cá nhân | Phim tham gia | Giải thưởng và đề cử | Chú thích | Liên kết ngoài | Trình đơn chuyển hướngProfile“Person Details for Thomas Stanley Holland, "England and Wales Birth Registration Index, 1837-2008" — FamilySearch.org”"Meet Tom Holland... the 16-year-old star of The Impossible""Schoolboy actor Tom Holland finds himself in Oscar contention for role in tsunami drama"“Naomi Watts on the Prince William and Harry's reaction to her film about the late Princess Diana”lưu trữ"Holland and Pflueger Are West End's Two New 'Billy Elliots'""I'm so envious of my son, the movie star! British writer Dominic Holland's spent 20 years trying to crack Hollywood - but he's been beaten to it by a very unlikely rival"“Richard and Margaret Povey of Jersey, Channel Islands, UK: Information about Thomas Stanley Holland”"Tom Holland to play Billy Elliot""New Billy Elliot leaving the garage"Billy Elliot the Musical - Tom Holland - Billy"A Tale of four Billys: Tom Holland""The Feel Good Factor""Thames Christian College schoolboys join Myleene Klass for The Feelgood Factor""Government launches £600,000 arts bursaries pilot""BILLY's Chapman, Holland, Gardner & Jackson-Keen Visit Prime Minister""Elton John 'blown away' by Billy Elliot fifth birthday" (video with John's interview and fragments of Holland's performance)"First News interviews Arrietty's Tom Holland"“33rd Critics' Circle Film Awards winners”“National Board of Review Current Awards”Bản gốc"Ron Howard Whaling Tale 'In The Heart Of The Sea' Casts Tom Holland"“'Spider-Man' Finds Tom Holland to Star as New Web-Slinger”lưu trữ“Captain America: Civil War (2016)”“Film Review: ‘Captain America: Civil War’”lưu trữ“‘Captain America: Civil War’ review: Choose your own avenger”lưu trữ“The Lost City of Z reviews”“Sony Pictures and Marvel Studios Find Their 'Spider-Man' Star and Director”“‘Mary Magdalene’, ‘Current War’ & ‘Wind River’ Get 2017 Release Dates From Weinstein”“Lionsgate Unleashing Daisy Ridley & Tom Holland Starrer ‘Chaos Walking’ In Cannes”“PTA's 'Master' Leads Chicago Film Critics Nominations, UPDATED: Houston and Indiana Critics Nominations”“Nominaciones Goya 2013 Telecinco Cinema – ENG”“Jameson Empire Film Awards: Martin Freeman wins best actor for performance in The Hobbit”“34th Annual Young Artist Awards”Bản gốc“Teen Choice Awards 2016—Captain America: Civil War Leads Second Wave of Nominations”“BAFTA Film Award Nominations: ‘La La Land’ Leads Race”“Saturn Awards Nominations 2017: 'Rogue One,' 'Walking Dead' Lead”Tom HollandTom HollandTom HollandTom Hollandmedia.gettyimages.comWorldCat Identities300279794no20130442900000 0004 0355 42791085670554170004732cb16706349t(data)XX5557367