【Mathematica】绘制彩虹

1、先来绘制七彩的圆盘各一个：

3、画一条长条形的彩虹：data = (Range[100]*0 + 1)*Hue[h[#]/360] & /@ colors;

5、重新清洗数据，再次画图：