Wolfram Neural Net Repository

Immediate Computable Access to Neural Net Models

Ademxapp Model A1 Trained on ADE20K Data

Segment an image into various semantic component classes

Released in 2016 by the University of Adelaide, this model exploits recent progress in the understanding of residual architectures. With only 17 residual units, it is able to outperform previous, much deeper architectures.

Number of layers: 141 | Parameter count: 124,684,886 | Trained size: 499 MB |

Training Set Information

Performance

Examples

Resource retrieval

Get the pre-trained net:

In[1]:=
NetModel["Ademxapp Model A1 Trained on ADE20K Data"]
Out[1]=

Evaluation function

Write an evaluation function to handle net reshaping and resampling of input and output:

In[2]:=
netevaluate[img_, device_ : "CPU"] := Block[ {net, resized, encData, dec, mean, var, prob}, net = NetModel["Ademxapp Model A1 Trained on ADE20K Data"]; resized = ImageResize[img, {504}]; encData = Normal@NetExtract[net, "Input"]; dec = NetExtract[net, "Output"]; {mean, var} = Lookup[encData, {"MeanImage", "VarianceImage"}]; prob = NetReplacePart[net, {"Input" -> NetEncoder[{"Image", ImageDimensions@resized, "MeanImage" -> mean, "VarianceImage" -> var}], "Output" -> Automatic} ][resized, TargetDevice -> device]; prob = ArrayResample[prob, Append[Reverse@ImageDimensions@img, 150]]; dec[prob] ]

Label list

Define the label list for this model. Integers in the model’s output correspond to elements in the label list:

In[3]:=
labels = {"wall", "building", "sky", "floor", "tree", "ceiling", "road", "bed", "windowpane", "grass", "cabinet", "sidewalk", "person", "earth", "door", "table", "mountain", "plant", "curtain", "chair", "car", "water", "painting", "sofa", "shelf", "house", "sea", "mirror", "rug", "field", "armchair", "seat", "fence", "desk", "rock", "wardrobe", "lamp", "bathtub", "railing", "cushion", "base", "box", "column", "signboard", "chest", "counter", "sand", "sink", "skyscraper", "fireplace", "refrigerator", "grandstand", "path", "stairs", "runway", "case", "pool", "pillow", "screen", "stairway", "river", "bridge", "bookcase", "blind", "coffee", "toilet", "flower", "book", "hill", "bench", "countertop", "stove", "palm", "kitchen", "computer", "swivel", "boat", "bar", "arcade", "hovel", "bus", "towel", "light", "truck", "tower", "chandelier", "awning", "streetlight", "booth", "television", "airplane", "dirt", "apparel", "pole", "land", "bannister", "escalator", "ottoman", "bottle", "buffet", "poster", "stage", "van", "ship", "fountain", "conveyer", "canopy", "washer", "plaything", "swimming", "stool", "barrel", "basket", "waterfall", "tent", "bag", "minibike", "cradle", "oven", "ball", "food", "step", "tank", "trade", "microwave", "pot", "animal", "bicycle", "lake", "dishwasher", "screen", "blanket", "sculpture", "hood", "sconce", "vase", "traffic", "tray", "ashcan", "fan", "pier", "crt", "plate", "monitor", "bulletin", "shower", "radiator", "glass", "clock", "flag"};

Basic usage

Obtain a segmentation mask for a given image:

In[4]:=
(* Evaluate this cell to get the example input *) CloudGet["https://www.wolframcloud.com/obj/44352668-c413-4c3f-8394-5b90298e01d3"]

Inspect which classes are detected:

In[5]:=
detected = DeleteDuplicates@Flatten@mask
Out[5]=
In[6]:=
labels[[detected]]
Out[6]=

Visualize the mask:

In[7]:=
Colorize[mask]
Out[7]=

Advanced visualization

Associate classes to colors:

In[8]:=
indexToColor = Thread[Range[150] -> ColorData["Legacy", "ColorList"][[1 ;; 150]]];

Write a function to overlap the image and the mask with a legend:

In[9]:=
result[img_, device_ : "CPU"] := Block[ {mask, classes, maskPlot, composition}, mask = netevaluate[img, device]; classes = DeleteDuplicates[Flatten@mask]; maskPlot = Colorize[mask, ColorRules -> indexToColor]; composition = ImageCompose[img, {maskPlot, 0.5}]; Legended[ Row[Image[#, ImageSize -> Large] & /@ {maskPlot, composition}], SwatchLegend[indexToColor[[classes, 2]], labels[[classes]]]] ]

Inspect the results:

In[10]:=
(* Evaluate this cell to get the example input *) CloudGet["https://www.wolframcloud.com/obj/65a16927-e2bd-4f93-81a7-6a1f8a8adb9c"]
Out[10]=
In[11]:=
(* Evaluate this cell to get the example input *) CloudGet["https://www.wolframcloud.com/obj/86603e02-9d75-49bb-83e0-e01abbbc8425"]
Out[11]=
In[12]:=
(* Evaluate this cell to get the example input *) CloudGet["https://www.wolframcloud.com/obj/033fb24b-0e5b-41e1-ae0d-14cc5bb0dec2"]
Out[12]=

Net information

Inspect the sizes of all arrays in the net:

In[13]:=
NetInformation[ NetModel["Ademxapp Model A1 Trained on ADE20K Data"], \ "ArraysElementCounts"]
Out[13]=

Obtain the total number of parameters:

In[14]:=
NetInformation[ NetModel["Ademxapp Model A1 Trained on ADE20K Data"], \ "ArraysTotalElementCount"]
Out[14]=

Obtain the layer type counts:

In[15]:=
NetInformation[ NetModel["Ademxapp Model A1 Trained on ADE20K Data"], \ "LayerTypeCounts"]
Out[15]=

Display the summary graphic:

In[16]:=
NetInformation[ NetModel["Ademxapp Model A1 Trained on ADE20K Data"], \ "SummaryGraphic"]
Out[16]=

Export to MXNet

Export the net into a format that can be opened in MXNet:

In[17]:=
jsonPath = Export[FileNameJoin[{$TemporaryDirectory, "net.json"}], NetModel["Ademxapp Model A1 Trained on ADE20K Data"], "MXNet"]
Out[17]=

Export also creates a net.params file containing parameters:

In[18]:=
paramPath = FileNameJoin[{DirectoryName[jsonPath], "net.params"}]
Out[18]=

Get the size of the parameter file:

In[19]:=
FileByteCount[paramPath]
Out[19]=

The size is similar to the byte count of the resource object:

In[20]:=
ResourceObject[ "Ademxapp Model A1 Trained on ADE20K Data"]["ByteCount"]
Out[20]=

Requirements

Wolfram Language 11.3 (March 2018) or above

Resource History

  • Date Created: 22 March 2018
  • Latest Update: 21 June 2018

Reference