Monday, December 16, 2019

Colorized Curves


Show[Table[Plot[Sin[x],{x,i*Pi/24,(i+1)*Pi/24},
PlotStyle->{Hue[i/48],Thickness[0.02]}],{i,Range[0,47,1]}],
         ImageSize->Large,GridLines->Automatic,PlotRange->All]

Posted by at
Labels: ,

No comments:

Post a Comment

Subscribe to: Post Comments (Atom)