OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
V:= [1, 1]: R:= NULL;
for i from 2 to 50 do
V:= [1, op(V[1..-2]+V[2..-1] mod 2), 1];
R:= R, op(map(`+`, select(t -> V[t]=0, [$1..i+1]), i*(i+1)/2-1));
od:
R; # Robert Israel, Apr 26 2020
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Feb 03 2016
STATUS
approved