login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Squares mod 91.
1

%I #19 Jan 13 2020 02:36:17

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

%T 78,79,81,88

%N Squares mod 91.

%t Union[PowerMod[Range[91], 2, 91]] (* _Alonso del Arte_, Jan 07 2020 *)

%o (Sage) [quadratic_residues(91)] # _Zerinvary Lajos_, May 28 2009

%o (Scala) (1 to 91).map(n => n * n % 91).toSet.toSeq.sorted // _Alonso del Arte_, Jan 13 2020

%Y Cf. A028804, A096008 (row 91).

%K nonn,fini,full,easy

%O 1,3

%A _N. J. A. Sloane_