OFFSET
1,2
FORMULA
a(n) = 2^A084688(n).
MATHEMATICA
Select[2^Range[0, 34], Max@ DigitCount@ # == 1 &] (* Michael De Vlieger, Aug 03 2015 *)
PROG
(PARI) lista() = {lim = ceil(log(10^11)/(log(2))); for (n=0, lim, d = digits(2^n); if (#vecsort(d, , 8) == #d, print1(n, ", ")); ); } \\ Michel Marcus, Aug 03 2015
CROSSREFS
KEYWORD
nonn,base,fini,full
AUTHOR
Zak Seidov, Aug 02 2015
STATUS
approved