OFFSET
1,210
COMMENTS
LINKS
PROG
(PARI) a(n)=my(N=1+#n=divisors(2*n)); sum(i=1, N\2, issquare(n[i]^2+n[N-i]^2));
CROSSREFS
KEYWORD
nonn
AUTHOR
M. F. Hasler, Dec 09 2010
EXTENSIONS
Secondary offset added by Antti Karttunen, Nov 24 2017
STATUS
approved