OFFSET
1,3
COMMENTS
No additional terms up to 50000. [Harvey P. Dale, Apr 12 2011]
MATHEMATICA
Select[Range[0, 50000], DigitCount[2^#, 10, 8]==0 &] (* Harvey P. Dale, Apr 12 2011 *)
PROG
(Magma) [n: n in [0..1000] | not 8 in Intseq(2^n) ]; // Vincenzo Librandi, May 06 2015
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Nov 15 1998
EXTENSIONS
Initial 0 added and Mathematica code adapted by Vincenzo Librandi, May 06 2015
STATUS
approved