如何在Mathematica中正确显示自定义3D图形？

Question

我需要将地球的3D模型合并到我在Mathematica中创建的卫星轨道拦截模拟中（我需要它与“Graphics3D []”一起使用。）我已经下载了Mathematica声称支持的几种不同模型我甚至在Pro / E中创建了自己的。实际上导入到程序中的那些（使用“Import []”）丢失了它们的表面图像，我留下了一个通用的球体。我怎样才能获得自定义的3D图形正确导入Mathematica？某些格式是否比其他格式更好？（我一直使用CAD模型）是否可以为Mathematica下载更多（用户创建的）3D图形？

我知道这是可能的，因为Belisarius在这里回答了一个问题： How to create 2D (3D) animation in Wolfram Mathematica with the camera following the object? 就观点来说，这几乎就是我需要做的事情。

Answer 1

myEarth = 
 ParametricPlot3D[{Cos@u Sin@v, Sin@u Sin@v, Cos@v}, {u, 0, 2 Pi}, {v, 0, Pi}, 
   Mesh -> None, TextureCoordinateFunction -> ({#4, 1 - #5} &), 
   PlotStyle -> Texture[Show[map, ImageSize -> 1000]]];  

a = {-1, 1};
Animate[
 Show[
  Graphics3D[Sphere[{0, 0, 0}, .5], 
   ViewPoint -> 3.5 {Cos@t, Sin@t, 0}, SphericalRegion -> True, 
   PlotRange -> {a, a, a}, Axes -> False, Boxed -> False],
   myEarth], 
{t, 0, 2 Pi}]

修改

我从哪里借了一些代码：http://reference.wolfram.com/mathematica/ref/Texture.html在应用程序下，地球纹理