A100829 Numbers that are a sum of two squares and not divisible by 17.

2, 5, 8, 10, 13, 18, 20, 25, 26, 29, 32, 37, 40, 41, 45, 50, 52, 53, 58, 61, 65, 72, 73, 74, 80, 82, 89, 90, 97, 98, 100, 101, 104, 106, 109, 113, 116, 117, 122, 125, 128, 130, 137, 145, 146, 148, 149, 157, 160, 162, 164, 169, 173, 178, 180, 181, 185, 193, 194, 197

Offset

1,1

Links

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

Mathematica

With[{upto=200}, Select[Total/@Tuples[Range[Ceiling[Sqrt[upto]]]^2, 2], Mod[ #, 17]!=0&&#<=upto&]]//Union (* Harvey P. Dale, May 18 2019 *)

Crossrefs

Cf. A000404, A098365.

Sequence in context: A202057 A263651 A070216 * A030713 A219222 A263831

Adjacent sequences: A100826 A100827 A100828 * A100830 A100831 A100832

Keyword

nonn

Author

Jun Mizuki (suzuki32(AT)sanken.osaka-u.ac.jp), Jan 06 2005

Status

approved