A010452 Squares mod 91.

0, 1, 4, 9, 14, 16, 22, 23, 25, 29, 30, 35, 36, 39, 42, 43, 49, 51, 53, 56, 64, 65, 74, 77, 78, 79, 81, 88

Offset

1,3

Links

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

Mathematica

Union[PowerMod[Range[91], 2, 91]] (* Alonso del Arte, Jan 07 2020 *)

Prog

(Sage) [quadratic_residues(91)] # Zerinvary Lajos, May 28 2009
(Scala) (1 to 91).map(n => n * n % 91).toSet.toSeq.sorted // Alonso del Arte, Jan 13 2020

Crossrefs

Cf. A028804, A096008 (row 91).

Sequence in context: A261445 A034259 A312988 * A312989 A312990 A312991

Adjacent sequences: A010449 A010450 A010451 * A010453 A010454 A010455

Keyword

nonn,fini,full,easy

Author

N. J. A. Sloane

Status

approved