¿Cómo se obtienen gráficos 3D personalizados para que se muestren correctamente en Mathematica?

Question

Necesito incorporar un modelo tridimensional de la Tierra en una simulación de intercepción de órbita satelital que he creado en Mathematica (lo necesito para trabajar con "Graphics3D []). He descargado varios modelos diferentes en formatos que Mathematica dice que admiten y Incluso creé el mío en Pro/E. Los que realmente se importan al programa (usando "Importar []") pierden su imagen de superficie y me queda una esfera genérica. ¿Cómo puedo obtener gráficos 3D personalizados para importarlos? correctamente en Mathematica? ¿Son ciertos formatos mejores que otros? (He estado usando la mayoría de los modelos CAD) ¿Y hay lugar para descargar más gráficos 3D (creados por el usuario) para Mathematica?

Sé que es posible porque Belisarius lo ha hecho en una respuesta a una pregunta aquí: How to create 2D (3D) animation in Wolfram Mathematica with the camera following the object? que es casi exactamente lo que tengo que hacer, en lo que respecta a los puntos de vista.

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}] 

Editar

he encontrado desde donde tomé prestado algo de código: http://reference.wolfram.com/mathematica/ref/Texture.html Bajo Aplicaciones, textura de la tierra