OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..10000
MATHEMATICA
PROG
(PARI) lista(nn) = Vec(select(x->x==0, vector(nn, n, floor((n+4)/sqrt(2)) - floor(n/sqrt(2)) - floor(4/sqrt(2))), 1)); \\ Michel Marcus, Apr 26 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Mar 30 2011
STATUS
approved