WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

断層撮影データを可視化する

CTスキャンの内部構造を可視化する．

Wolfram Language code: Image3D[\!\(\*Graphics3DBox[«10»]\), "Byte", ColorFunction -> (Blend[{{0, RGBColor[0, 0, 0, 0]}, {0.07, RGBColor[0.03, 1, 0.03, 0.05]}, {0.12, RGBColor[1, 0.01, 0.03, 0.17]}, {0.18, RGBColor[1, 0.5, 0, 0]}, {0.29, RGBColor[0, 0, 0.5, 0.09]}, {0.54, RGBColor[0, 0, 0.5, 0.09]}, {0.57, RGBColor[0.13, 0.13, 0.13, 0]}, {1, RGBColor[1, 1, 1, 0]}}, #1]&)]