OFFSET
1,1
COMMENTS
The sequence shows subsets of consecutive numbers.
153 is assumed to be the largest integer missing in this sequence. - Alois P. Heinz, Jan 28 2022
LINKS
Michel Marcus, Table of n, a(n) for n = 1..962
EXAMPLE
17 is a term because the digits 1 and 7 are included in the number 2^17 = 131072;
3 is not a term because the digit 3 is not in the number 2^3 = 8.
33 is not a term because 2^33 = 8589934592 does not have 2 digits 3.
153 is not in the sequence because the digit 3 is not in the number 2^153 = 11417981541647679048466287755595961091061972992.
MATHEMATICA
Reap[Do[a = DigitCount[2^n]; b = DigitCount[n]; If[Min[a-b] >= 0, Sow[n]], {n, 10^3}]][[2, 1]]
PROG
(PARI) isok(m) = {my(d=digits(m), dd=digits(2^m)); for (i=0, 9, if (#select(x->(x==i), d) > #select(x->(x==i), dd), return (0)); ); return(1); } \\ Michel Marcus, Jan 28 2022
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Michel Lagneau, Dec 20 2010
EXTENSIONS
Name clarified by Michel Marcus, Jan 30 2022
STATUS
approved