OFFSET
1,1
COMMENTS
Appears to include all multiples of 4 that are not squares. - Robert Israel, Mar 11 2018
LINKS
Robert Israel, Table of n, a(n) for n = 1..2830
MAPLE
f:= n -> add(numtheory:-jacobi(n-k, k), k=1..n):
select(n -> f(n)=0, [$1..300]); # Robert Israel, Mar 11 2018
MATHEMATICA
Select[ Range[200], Sum[ KroneckerSymbol[# - k, k], {k, 1, #}] == 0 & ] (* Jean-François Alcover, Jul 29 2013 *)
PROG
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Luschny, Aug 07 2012
STATUS
approved