login
A260814
Powers of 2 with distinct digits.
2
1, 2, 4, 8, 16, 32, 64, 128, 256, 512, 1024, 2048, 4096, 8192, 16384, 32768, 1048576, 536870912
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