Melhorias em imagens 3D
De forma padrão, as imagens 3D não respondem à iluminação. Os valores de cor são puramente determinados por uma dada função de cor.
mostre o input completo da Wolfram Language
In[3]:=
img3d = Image3D[data, "Byte", options, ImageSize -> 400]
Out[3]=
Ativar a iluminação do volume pode ajudar a destacar detalhes da superfície. Neste caso, uma luz direcional é adicionada apontando para o plano da tela, e reflexão especular é adicionada ao objeto da imagem.
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]=
Imagens granuladas podem ser melhoradas interpolando os 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]=
Visualize a transição do original para a imagem interpolada e destacada.
mostre o input completo da Wolfram Language
In[7]:=
Animate[Overlay[{original, SetAlphaChannel[fine, i]}], {i, 0, 1},
AnimationRate -> 1/3, AnimationDirection -> ForwardBackward]