OFFSET
0,6
COMMENTS
In short, the running count of missing terms in A247665.
LINKS
N. J. A. Sloane, Table of n, a(n) for n = 0..10000
MAPLE
# computes first M terms, assumes b1 is list of first M terms of A247665
M:=100; A:=[]; miss:=[1]; ctmiss:=[1]; last:=1; nom:=1;
for n from 1 to M do
t1:=b1[n]; A:=[op(A), t1];
if member(t1, miss) then nom:=nom-1; ctmiss:=[op(ctmiss), nom];
miss:=remove('x->x=t1', miss);
else
for i from last+1 to t1-1 do
if not member(i, A) and not member(i, miss) then miss:=[op(miss), i]; nom:=nom+1; fi;
od:
ctmiss:=[op(ctmiss), nom];
fi;
last:=t1;
od:
ctmiss;
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Oct 30 2014
STATUS
approved