Новое в системе Wolfram
Mathematica
9
◄
предыдущая
|
следующая
►
Новое в системе Wolfram
Mathematica
9
›
Обработка 3D объёмных изображений
Анализ трёхмерных изображений с использованием внешней памяти
Нахождение гистрограммы объёмного изображения с использованием внешней памяти.
In[1]:=
X
counts = ConstantArray[0, 256];
In[2]:=
X
f[x_] := Block[{b = Clip[Floor[255 x + .5], {0, 255}]}, counts[[b + 1]]++];
In[3]:=
X
ImageFileScan[f, ExampleData[{"TestImage3D", "CThead"}, "FilePath"]];
In[4]:=
X
ListLinePlot[counts, InterpolationOrder -> 0, Filling -> Bottom]
Out[4]=