Specifies the specular highlight of 3D surfaces
与 .wl 参考的差异： `Specularity` is accepted and ignored
Specularity[s]
Specularity[s, n]
Graphics3D[{Specularity[1, 20], Sphere[]}]
→ -Graphics3D-Table[Graphics3D[{Orange, Specularity[White, n], Sphere[]}], {n, {5, 20, 100}}]
→ {-Graphics3D-, -Graphics3D-, -Graphics3D-}Table[Graphics3D[{Black, Specularity[c, 10], Sphere[]}, Lighting -> "Neutral"], {c, {Red, Green, Blue}}]
→ {-Graphics3D-, -Graphics3D-, -Graphics3D-}