A010409 Squares mod 48.

0, 1, 4, 9, 16, 25, 33, 36

Offset

1,3

Links

Table of n, a(n) for n=1..8.

Mathematica

Union[PowerMod[Range[48], 2, 48]] (* Alonso del Arte, Dec 24 2019 *)

Prog

(Sage) [quadratic_residues(48)] # Zerinvary Lajos, May 24 2009
(Scala) (1 to 48).map(n => (n * n) % 48).toSet.toSeq.sorted // Alonso del Arte, Dec 24 2019

Crossrefs

Cf. A028761.

Sequence in context: A337534 A126589 A340585 * A010457 A244833 A331220

Adjacent sequences: A010406 A010407 A010408 * A010410 A010411 A010412

Keyword

nonn,fini,full,easy

Author

N. J. A. Sloane

Status

approved