<<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