A010407 Squares mod 46.

0, 1, 2, 3, 4, 6, 8, 9, 12, 13, 16, 18, 23, 24, 25, 26, 27, 29, 31, 32, 35, 36, 39, 41

Offset

1,3

Links

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

Mathematica

Union[PowerMod[Range[46], 2, 46]] (* Alonso del Arte, Dec 23 2019 *)

Prog

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

Crossrefs

Cf. A028759.

Sequence in context: A095037 A191284 A071403 * A035240 A278580 A028929

Adjacent sequences: A010404 A010405 A010406 * A010408 A010409 A010410

Keyword

nonn,fini,full,easy

Author

N. J. A. Sloane

Status

approved