Graphics3D[{PointSize[0.03], SurfaceColor[RGBColor[0., 0.9, 1.]], EdgeForm[{RGBColor[0., 0., 1.], Thickness[0.012]}], {Polygon[{{0., -0.86603, 0.28868}, {0.57735, -0.57735, 0.57735}, {0.28868, -0.86603, 0.}, {0., -0.86603, 0.28868}}], Polygon[{{0.57735, -0.57735, 0.57735}, {0., -0.28868, 0.86603}, {0.28868, 0., 0.86603}, {0.57735, -0.57735, 0.57735}}], Polygon[{{0., -0.28868, 0.86603}, {0.57735, -0.57735, 0.57735}, {0., -0.86603, 0.28868}, {-0.57735, -0.57735, 0.57735}, {0., -0.28868, 0.86603}}], Polygon[{{0.86603, 0., 0.28868}, {0.57735, 0.57735, 0.57735}, {0.86603, 0.28868, 0.}, {0.86603, 0., 0.28868}}], Polygon[{{0.86603, 0., 0.28868}, {0.57735, -0.57735, 0.57735}, {0.28868, 0., 0.86603}, {0.57735, 0.57735, 0.57735}, {0.86603, 0., 0.28868}}], Polygon[{{0.57735, 0.57735, -0.57735}, {0.86603, 0., -0.28868}, {0.86603, 0.28868, 0.}, {0.57735, 0.57735, -0.57735}}], Polygon[{{0.86603, 0., -0.28868}, {0.57735, 0.57735, -0.57735}, {0.28868, 0., -0.86603}, {0.57735, -0.57735, -0.57735}, {0.86603, 0., -0.28868}}], Polygon[{{-0.57735, 0.57735, 0.57735}, {-0.86603, 0., 0.28868}, {-0.86603, 0.28868, 0.}, {-0.57735, 0.57735, 0.57735}}], Polygon[{{0., 0.28868, 0.86603}, {0.57735, 0.57735, 0.57735}, {0.28868, 0., 0.86603}, {0., 0.28868, 0.86603}}], Polygon[{{0., 0.86603, 0.28868}, {0.57735, 0.57735, 0.57735}, {0., 0.28868, 0.86603}, {-0.57735, 0.57735, 0.57735}, {0., 0.86603, 0.28868}}], Polygon[{{0.86603, 0., 0.28868}, {0.86603, -0.28868, 0.}, {0.57735, -0.57735, 0.57735}, {0.86603, 0., 0.28868}}], Polygon[{{0.86603, -0.28868, 0.}, {0.86603, 0., -0.28868}, {0.57735, -0.57735, -0.57735}, {0.86603, -0.28868, 0.}}], Polygon[{{0.57735, -0.57735, 0.57735}, {0.86603, -0.28868, 0.}, {0.57735, -0.57735, -0.57735}, {0.28868, -0.86603, 0.}, {0.57735, -0.57735, 0.57735}}], Polygon[{{0.86603, 0., -0.28868}, {0.86603, -0.28868, 0.}, {0.86603, 0., 0.28868}, {0.86603, 0.28868, 0.}, {0.86603, 0., -0.28868}}], Polygon[{{0.57735, 0.57735, -0.57735}, {0., 0.28868, -0.86603}, {0.28868, 0., -0.86603}, {0.57735, 0.57735, -0.57735}}], Polygon[{{0.57735, 0.57735, -0.57735}, {0., 0.86603, -0.28868}, {-0.57735, 0.57735, -0.57735}, {0., 0.28868, -0.86603}, {0.57735, 0.57735, -0.57735}}], Polygon[{{-0.28868, 0., 0.86603}, {0., -0.28868, 0.86603}, {-0.57735, -0.57735, 0.57735}, {-0.28868, 0., 0.86603}}], Polygon[{{0., 0.28868, 0.86603}, {-0.28868, 0., 0.86603}, {-0.57735, 0.57735, 0.57735}, {0., 0.28868, 0.86603}}], Polygon[{{-0.57735, 0.57735, 0.57735}, {-0.28868, 0., 0.86603}, {-0.57735, -0.57735, 0.57735}, {-0.86603, 0., 0.28868}, {-0.57735, 0.57735, 0.57735}}], Polygon[{{0., -0.28868, 0.86603}, {-0.28868, 0., 0.86603}, {0., 0.28868, 0.86603}, {0.28868, 0., 0.86603}, {0., -0.28868, 0.86603}}], Polygon[{{-0.57735, 0.57735, 0.57735}, {-0.28868, 0.86603, 0.}, {0., 0.86603, 0.28868}, {-0.57735, 0.57735, 0.57735}}], Polygon[{{0., 0.86603, -0.28868}, {-0.28868, 0.86603, 0.}, {-0.57735, 0.57735, -0.57735}, {0., 0.86603, -0.28868}}], Polygon[{{-0.57735, 0.57735, -0.57735}, {-0.28868, 0.86603, 0.}, {-0.57735, 0.57735, 0.57735}, {-0.86603, 0.28868, 0.}, {-0.57735, 0.57735, -0.57735}}], Polygon[{{0.28868, 0.86603, 0.}, {0.57735, 0.57735, 0.57735}, {0., 0.86603, 0.28868}, {0.28868, 0.86603, 0.}}], Polygon[{{0.28868, 0.86603, 0.}, {0., 0.86603, -0.28868}, {0.57735, 0.57735, -0.57735}, {0.28868, 0.86603, 0.}}], Polygon[{{0.28868, 0.86603, 0.}, {0., 0.86603, 0.28868}, {-0.28868, 0.86603, 0.}, {0., 0.86603, -0.28868}, {0.28868, 0.86603, 0.}}], Polygon[{{0.57735, 0.57735, 0.57735}, {0.28868, 0.86603, 0.}, {0.57735, 0.57735, -0.57735}, {0.86603, 0.28868, 0.}, {0.57735, 0.57735, 0.57735}}], Polygon[{{0., -0.86603, 0.28868}, {-0.28868, -0.86603, 0.}, {-0.57735, -0.57735, 0.57735}, {0., -0.86603, 0.28868}}], Polygon[{{-0.86603, 0., -0.28868}, {-0.57735, 0.57735, -0.57735}, {-0.86603, 0.28868, 0.}, {-0.86603, 0., -0.28868}}], Polygon[{{0., -0.28868, -0.86603}, {0.57735, -0.57735, -0.57735}, {0.28868, 0., -0.86603}, {0., -0.28868, -0.86603}}], Polygon[{{0.57735, -0.57735, -0.57735}, {0., -0.86603, -0.28868}, {0.28868, -0.86603, 0.}, {0.57735, -0.57735, -0.57735}}], Polygon[{{-0.28868, -0.86603, 0.}, {0., -0.86603, -0.28868}, {-0.57735, -0.57735, -0.57735}, {-0.28868, -0.86603, 0.}}], Polygon[{{0., -0.86603, -0.28868}, {0.57735, -0.57735, -0.57735}, {0., -0.28868, -0.86603}, {-0.57735, -0.57735, -0.57735}, {0., -0.86603, -0.28868}}], Polygon[{{0.28868, -0.86603, 0.}, {0., -0.86603, -0.28868}, {-0.28868, -0.86603, 0.}, {0., -0.86603, 0.28868}, {0.28868, -0.86603, 0.}}], Polygon[{{-0.86603, -0.28868, 0.}, {-0.86603, 0., 0.28868}, {-0.57735, -0.57735, 0.57735}, {-0.86603, -0.28868, 0.}}], Polygon[{{-0.86603, 0., -0.28868}, {-0.86603, -0.28868, 0.}, {-0.57735, -0.57735, -0.57735}, {-0.86603, 0., -0.28868}}], Polygon[{{-0.86603, -0.28868, 0.}, {-0.57735, -0.57735, 0.57735}, {-0.28868, -0.86603, 0.}, {-0.57735, -0.57735, -0.57735}, {-0.86603, -0.28868, 0.}}], Polygon[{{-0.86603, 0., 0.28868}, {-0.86603, -0.28868, 0.}, {-0.86603, 0., -0.28868}, {-0.86603, 0.28868, 0.}, {-0.86603, 0., 0.28868}}], Polygon[{{-0.28868, 0., -0.86603}, {0., 0.28868, -0.86603}, {-0.57735, 0.57735, -0.57735}, {-0.28868, 0., -0.86603}}], Polygon[{{0., -0.28868, -0.86603}, {-0.28868, 0., -0.86603}, {-0.57735, -0.57735, -0.57735}, {0., -0.28868, -0.86603}}], Polygon[{{-0.28868, 0., -0.86603}, {-0.57735, 0.57735, -0.57735}, {-0.86603, 0., -0.28868}, {-0.57735, -0.57735, -0.57735}, {-0.28868, 0., -0.86603}}], Polygon[{{0., 0.28868, -0.86603}, {-0.28868, 0., -0.86603}, {0., -0.28868, -0.86603}, {0.28868, 0., -0.86603}, {0., 0.28868, -0.86603}}]}, {RGBColor[1., 0., 0.], Point[{0., -0.86603, 0.28868}], RGBColor[1., 1., 1.], Point[{0.57735, -0.57735, 0.57735}], RGBColor[1., 0., 0.], Point[{0.28868, -0.86603, 0.}], RGBColor[1., 0., 0.], Point[{0., -0.28868, 0.86603}], RGBColor[1., 0., 0.], Point[{0.28868, 0., 0.86603}], RGBColor[1., 1., 1.], Point[{-0.57735, -0.57735, 0.57735}], RGBColor[1., 0., 0.], Point[{0.86603, 0., 0.28868}], RGBColor[1., 1., 1.], Point[{0.57735, 0.57735, 0.57735}], RGBColor[1., 0., 0.], Point[{0.86603, 0.28868, 0.}], RGBColor[1., 1., 1.], Point[{0.57735, 0.57735, -0.57735}], RGBColor[1., 0., 0.], Point[{0.86603, 0., -0.28868}], RGBColor[1., 0., 0.], Point[{0.28868, 0., -0.86603}], RGBColor[1., 1., 1.], Point[{0.57735, -0.57735, -0.57735}], RGBColor[1., 1., 1.], Point[{-0.57735, 0.57735, 0.57735}], RGBColor[1., 0., 0.], Point[{-0.86603, 0., 0.28868}], RGBColor[1., 0., 0.], Point[{-0.86603, 0.28868, 0.}], RGBColor[1., 0., 0.], Point[{0., 0.28868, 0.86603}], RGBColor[1., 0., 0.], Point[{0., 0.86603, 0.28868}], RGBColor[1., 0., 0.], Point[{0.86603, -0.28868, 0.}], RGBColor[1., 0., 0.], Point[{0., 0.28868, -0.86603}], RGBColor[1., 0., 0.], Point[{0., 0.86603, -0.28868}], RGBColor[1., 1., 1.], Point[{-0.57735, 0.57735, -0.57735}], RGBColor[1., 0., 0.], Point[{-0.28868, 0., 0.86603}], RGBColor[1., 0., 0.], Point[{-0.28868, 0.86603, 0.}], RGBColor[1., 0., 0.], Point[{0.28868, 0.86603, 0.}], RGBColor[1., 0., 0.], Point[{-0.28868, -0.86603, 0.}], RGBColor[1., 0., 0.], Point[{-0.86603, 0., -0.28868}], RGBColor[1., 0., 0.], Point[{0., -0.28868, -0.86603}], RGBColor[1., 0., 0.], Point[{0., -0.86603, -0.28868}], RGBColor[1., 1., 1.], Point[{-0.57735, -0.57735, -0.57735}], RGBColor[1., 0., 0.], Point[{-0.86603, -0.28868, 0.}], RGBColor[1., 0., 0.], Point[{-0.28868, 0., -0.86603}]}}, {Background -> GrayLevel[0.], Boxed -> False, LightSources -> {{{-5., -5., 5.}, GrayLevel[1.]}, {{-5., 5., 5.}, GrayLevel[1.]}, {{5., 5., 5.}, GrayLevel[1.]}, {{2., -3., -5.}, GrayLevel[1.]}}, ViewPoint -> {4., 2., 2.}, SphericalRegion -> True, PlotRange -> {{-1., 1.}, {-1., 1.}, {-1., 1.}}}]