Component Analysis & Selection in 3D 

Compute properties of volumetric components.

In[1]:=

X -Graphics-

Segment the above volume into two components and background.

In[2]:=

X segments = MorphologicalComponents[vol]; Image3D[Colorize[segments], Boxed -> True]

Out[2]=

Compute properties of the volume for each component.

In[3]:=

X ComponentMeasurements[ {vol, segments}, { "FilledCount", "Count", "MeanIntensity", "StandardDeviationIntensity"} ]

Out[3]=

Out[13]//TraditionalForm=

Select the vegetable with a the larger filled volume.

In[4]:=

X SelectComponents[vol, "FilledCount", -1]

Out[4]=