login
A010410
Squares mod 49.
2
0, 1, 2, 4, 8, 9, 11, 15, 16, 18, 22, 23, 25, 29, 30, 32, 36, 37, 39, 43, 44, 46
OFFSET
1,3
FORMULA
a(n) = a(n-1) + a(n-3) - a(n-4) for 5 < n <= 22. - Chai Wah Wu, Jan 30 2018
MATHEMATICA
Union[PowerMod[Range[49], 2, 49]] (* Alonso del Arte, Jan 07 2020 *)
PROG
(Sage) [quadratic_residues(49)] # Zerinvary Lajos, May 24 2009
(Scala) (1 to 49).map(n => n * n % 49).toSet.toSeq.sorted // Alonso del Arte, Jan 07 2020
CROSSREFS
Row 49 of A096008.
Sequence in context: A035268 A035241 A034036 * A010459 A233999 A047350
KEYWORD
nonn,fini,full,easy
STATUS
approved