A065719 Number of 8's in decimal expansion of 2^n.
0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 1, 1, 0, 0, 0, 2, 1, 0, 0, 4, 0, 0, 2, 1, 1, 1, 1, 2, 0, 2, 2, 2, 1, 1, 1, 4, 0, 0, 1, 2, 1, 4, 1, 3, 1, 0, 2, 3, 0, 0, 4, 3, 0, 4, 2, 2, 1, 1, 3, 3, 1, 3, 3, 2, 2, 2, 1, 4, 2, 0, 7, 3, 1, 4, 0, 4, 2, 2, 5, 1, 4, 3, 1, 1, 4, 1, 3, 6, 1, 1, 7, 3, 1, 5, 1, 4, 1
Offset: 0
Links
- Harry J. Smith, Table of n, a(n) for n = 0..1000
Crossrefs
Programs
-
Mathematica
Table[ Count[ IntegerDigits[2^n], 8], {n, 0, 100} ] DigitCount[2^Range[0,100],10,8] (* Harvey P. Dale, Aug 02 2024 *)
-
PARI
a(n) = #select(x->(x==8), digits(2^n)); \\ Michel Marcus, Jun 15 2018
-
Python
def A065719(n): return str(2**n).count('8') # Chai Wah Wu, Feb 14 2020
Extensions
More terms from Robert G. Wilson v, Dec 07 2001
Comments