Gitternetze aus Bildern
Version 11 bietet die neue ImageMesh-Funktion zur Umwandlung von zwei- und dreidimensionalen Bildern in Gitternetze.
Rufen Sie ein Bild des Great Salt Lakes ab und führen Sie eine Segmentierung mithilfe des Region-Growing-Verfahrens durch.
In[1]:=
orig = EntityValue[Entity["Lake", "GreatSaltLake::yw8cf"], "Image"];
img = RegionBinarize[orig, \!\(\*
GraphicsBox[
TagBox[RasterBox[CompressedData["
1:eJzt1jEKwkAQQNFdK0uv4C1sLW0VD6AYxSZCFMRzCJ7XiF3SzFb7lf8ggUCK
D8MmM99f1sdJSuk67W/r3X3ZdbvHZtY/bNvr+dQ2h1V7a05Nt9h/Xnv21ytJ
kiRJkiRJkn5H7tVuGLMqzqo4q+KsiuNW8bKsimNWfbNwXVbF5Yzuqp0xZFUB
dBaui5kF/T5AsxJ1jNAsq0qgs3BlOSPDMrMLmvUBDcNnsbqov2x4FrWrdscA
NIu6SjCzoEOEZlGniF5Ta0eMmVXCqjjmCJlV5KzaDWNWxXGreFnMKvAIazeM
MUfIXEmtKsCs8hSWsCrOqjhmlSRJkiRJkvS/3tRrD1M=
"], {{0, 147}, {150,
0}}, {0, 1},
ColorFunction->GrayLevel],
BoxForm`ImageTag["Bit", ColorSpace -> Automatic, Interleaving -> None],
Selectable->False],
DefaultBaseStyle->"ImageGraphics",
ImageSizeRaw->{150, 147},
PlotRange->{{0, 150}, {0, 147}}]\), 1/5];
GraphicsRow[{orig, img}]
Out[1]=
Erstellen Sie ein 2D-Gitternetz des Bildes.
In[2]:=
ImageMesh[img]
Out[2]=
Ermitteln Sie das 3D-Bild eines Motors.
In[3]:=
img = Import["ExampleData/CTengine.tiff", "Image3D"]
Out[3]=
Erstellen Sie ein 3D-Gitternetz des Motors.
In[4]:=
ImageMesh[img]
Out[4]=