|
%I #5 Jul 14 2012 11:32:32
%S 3,5,6,11,12,13,15,16,19,21,25,27,28,29,32,33,35,37,39,40,42,45,47,53,
%T 54,55,58,60,65,72,73,74,76,78,79,81,82,84,85,88,90,92,93,96,98,102,
%U 105,106,108,112,115,116,117,118,121,122,123,127,128,130,133,134,139,141
%N Positive integers not occurring in A167500.
%C Equivalently, positions of zero digits in A167502 (when all terms are concatenated).
%o (PARI) {a=b=[]; for(n=1,99, #b>=n & for(i=a[n-1]+1,#b,b[i] & (a=concat(a,i)) & break); #a<n & a=concat(a,#b+1); b=concat(b,binary(a[n]))); for(i=1,#b, b[i] | print1(i","))}
%Y Cf. A167500-A167503, A167520-A167523.
%K nonn,base
%O 1,1
%A _M. F. Hasler_, Nov 05 2009
|
