I have found the equation below written with Mathematica, I looked at the Mathematica online guide but it is still difficult to understand the equation. Can someone write this (or part of it) in simple math using latex, please.
n[r_] := Sum[ 1 + 2 Floor[Sqrt[r^2 - 3 x^2]],
{x, -Floor[r/Sqrt[3]], Floor[r/Sqrt[3]]}
] + Sum[2 Floor[ Sqrt[r^2 - 3 x^2] + 1/2],
{x, -Floor[(r/Sqrt[3]) + 1/2] + 1/2, Floor[(r/Sqrt[3]) + 1/2] - 1/2}
]