Mathematica颜色系,你喜欢哪一个?

Column[{#, 
Row[Graphics[{#, PointSize[0.5], Point[{0, 0}]},
ImageSize -> 50] & /@ ColorData[#, "ColorList"]]} & /@
Range[62]]

 

posted on 2012-03-30 16:53  大宝pku  阅读(1372)  评论(0编辑  收藏  举报

导航