Gaussian primes, colored by norm
source
<Show GridLines="[10, 10]" Axes ImageSize="[Automatic, 440]">
<LatticeTiles
ColorRules='[IsPrime -> ColorData(["Dusk", [0, 10], "Reflected"])(Sqrt(Abs(Norm))), IsUnit -> White]'
BoundaryStyle="[IsZero -> White]"
>
GaussianIntegers
</LatticeTiles>
</Show>