MathGroup Archive 2005

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: plots with variation of arbitrary constant


Hi,
I'm near a computer with Mathematica now, so here is a "more elegant"
display
<<Graphics`
ShowLegend[DisplayTogether[Table[Plot[-1 + Sin[x] + c, {x, 0, Pi},
PlotStyle -> Hue[c/10]], {c, 10}], DisplayFunction -> Identity], {(
Hue[1 - 9#/10] &), 10, "c=10", "c=1", LegendPosition -> {1, -0.5}}]
regards
yehuda



  • Prev by Date: Re: plots with variation of arbitrary constant
  • Next by Date: Re: plots with variation of arbitrary constant
  • Previous by thread: Re: plots with variation of arbitrary constant
  • Next by thread: Re: plots with variation of arbitrary constant