A035060 Numbers k such that 2^k does not contain the digit 5 (probably finite).
0, 1, 2, 3, 4, 5, 6, 7, 10, 11, 12, 13, 14, 15, 17, 18, 22, 23, 24, 26, 27, 30, 31, 32, 34, 36, 38, 43, 46, 55, 62, 65, 66, 71
Offset: 1
Crossrefs
Cf. similar sequences listed in A035064.
Programs
-
Magma
[n: n in [0..1000] | not 5 in Intseq(2^n) ]; // Vincenzo Librandi, May 07 2015
-
Mathematica
Join[{0}, Select[Range@10000, FreeQ[IntegerDigits[2^#], 5] &]] (* Vincenzo Librandi, May 07 2015 *) Select[Range[0,80],DigitCount[2^#,10,5]==0&] (* Harvey P. Dale, Dec 24 2018 *)
Extensions
Initial 0 inserted by Vincenzo Librandi, May 07 2015