Artlandia functions are shown in red.
<<Artlandia`
Density[fun_, dim_] :=
  ListDensityPlot[fun[dim], Mesh -> False, ColorFunction -> Hue,
   Frame -> False, Background -> Black]
Density[RandomArray, {150,150}]
Density[NaturalArray, {150,150}]
Density[RandomWalkArray, {150,150}]

Return