【Mathematica】球面着色方案

1、ColorFunction -> (Hue[#] &)。

何以至此？不明就里。

2、ColorFunction -> (Hue[Sin[6 #]] &)：

3、按照坐标着色，需要调用Function命令：

ColorFunction -> Function[{x, y, z, u, v}, Hue[3 z]]

4、ColorFunction -> Function[{x, y, z, u, v}, Hue[3*z + 3*y]]

5、ColorFunction -> Function[{x, y, z, u, v}, Hue[6 (x y z)]]

6、ColorFunction -> Function[{x, y, z, u, v}, Hue[3 v]]

7、ColorFunction -> Function[{x, y, z, u, v}, Hue[3 u]]