Mejoras en imágenes en 3D
De forma predeterminada, las imágenes en 3D no responden a iluminación. Los valores de color son determinados puramente por una función de color dada.
muestre la entrada completa de Wolfram Language
In[3]:=

img3d = Image3D[data, "Byte", options, ImageSize -> 400]
Out[3]=

La activación de iluminación de volumen puede ayudar a resaltar detalles de la superficie. En este caso, una luz direccional en el plano de la pantalla y espectacularidad, son agregadas al objeto de imagen.
In[4]:=

ImageCrop[
Show[Graphics3D[Specularity[Orange, 3], Background -> Black],
Image3D[img3d, Method -> {"VolumeLighting" -> True}], options,
Lighting -> {{"Directional", White, ImageScaled[{0, 0, 2}]}},
ImageSize -> 700], {410, 410}]
Out[4]=

Las imágenes granuladas pueden ser mejoradas interpolando los valores.
In[5]:=

fine = ImageCrop[
Show[Graphics3D[Specularity[Orange, 3], Background -> Black],
Image3D[img3d,
Method -> {"VolumeLighting" -> True,
"InterpolateValues" -> True}], options,
Lighting -> {{"Directional", White, ImageScaled[{0, 0, 2}]}},
ImageSize -> 700], {410, 410}]
Out[5]=

Visualice la transición de la imagen original a la imagen interpolada y resaltada
muestre la entrada completa de Wolfram Language
In[7]:=

Animate[Overlay[{original, SetAlphaChannel[fine, i]}], {i, 0, 1},
AnimationRate -> 1/3, AnimationDirection -> ForwardBackward]

