相关疑难解决方法(0)

是否可以自动将任何文本添加到多面体的面上,如此手动绘制的图形显示(示例的奇数编号方案不相关):

标记顶点很容易:

c = 1;
Show[{Graphics3D[
   Text[c++, #] & /@ PolyhedronData["Dodecahedron", "VertexCoordinates"]], 
   PolyhedronData["Dodecahedron"]},
   Boxed -> False]

(即使一些文本放在隐藏顶点的形状前面.这可能是可溶的.)

但是,当我试图为面孔做同样的事情时,没有任何效果.PolyhedronData["Dodecahedron", "Faces"]返回GraphicsComplex,而不是坐标.

我忽略了一个简单的解决方案/选项吗？

编辑:感谢这些答案,他们都很棒.如果我能将szabolcs的答案的文本放置与belisarius的文本质量相结合,那么完美的解决方案就在眼前!