A035057 Numbers k such that 2^k does not contain the digit 1 (probably finite).
1, 2, 3, 5, 6, 8, 11, 12, 15, 16, 19, 23, 25, 28, 32, 33, 35, 38, 43, 52, 56, 59, 63, 66, 73, 91
Offset: 1
Crossrefs
Cf. similar sequences listed in A035064.
Programs
-
Magma
[n: n in [0..1000] | not 1 in Intseq(2^n) ]; // Vincenzo Librandi, May 06 2015
-
Mathematica
Select[Range[100],DigitCount[2^#,10,1]==0&] (* Harvey P. Dale, Jun 06 2013 *)
-
PARI
A035057=[n|n<-[0..99], !setsearch(Set(digits(2^n)),1)] \\ M. F. Hasler, Jul 09 2025
-
Python
A035057_list = [n for n in range(1,10**3) if '1' not in str(2**n)] # Chai Wah Wu, Aug 31 2017
Comments