OFFSET
1,1
COMMENTS
a(n) <= 5, since A009003 contains all multiples of 5. - Robert Israel, Dec 08 2016
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
L:= select(t -> has(numtheory:-factorset(t) mod 4, 1), [$1..1000]):
L[2..-1]-L[1..-2]; # Robert Israel, Dec 08 2016
MATHEMATICA
Differences@ Select[Range@ 208, Length@ PowersRepresentations[#^2, 2, 2] > 1 &] (* Michael De Vlieger, Nov 25 2016, after Alonso del Arte at A009003 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Zhandos Mambetaliyev, Nov 24 2016
STATUS
approved