Mathematica:Graphics3D中相对于图像坐标的文本

时间:2011-06-13 22:12:42

标签: wolfram-mathematica plot mathematica-8

Mathematica文档说明:“三维图形中的文本放置在与指定的点{x,y,z}的投影相对应的位置。文本在所有其他对象的前面绘制”。如何相对于图像大小定位文本?

这是如何在2D中完成的:

custumLabels = Graphics[{
  Text[Style["A", Red, Bold, 18], ImageScaled[{0.025, .95}]], 
  Text[Style["B", Red, Bold, 18], ImageScaled[{0.95, .05}]]}
];
Framed[Show[
  Plot[
    Sin[x] Exp[x], {x, 0, 10},
    Frame -> True,
    PlotRangeClipping -> False,
    FrameLabel -> {"x", "y"}
  ],
  custumLabels
 ],
 FrameMargins -> 0]

Output

只要PlotRangeClipping设置为False,这些标签就会始终显示在该位置。问题是,如果切换到Graphics3D,如何使这些标签出现在该特定位置。试着用一个简单的。

Framed[Show[
  Graphics3D[{Sphere[{0, 0, 0}, 1]}]
 ],
 FrameMargins -> 0]

1 个答案:

答案 0 :(得分:6)

3D中的

EpilogProlog使用缩放的2D坐标系(适用于所有基元):

Graphics3D[{Sphere[]}, Epilog -> Text["abcdef", Scaled[{0.1, 0.1}]]]

enter image description here