OFFSET
1,10
LINKS
Anthony Sand, Table of n, a(n) for n = 1..1000
FORMULA
EXAMPLE
a(1) = zerocount(1^1) = zerocount(1) = 0.
a(8) = zerocount(8^8) = zerocount(16777216) = 0.
a(9) = zerocount(9^9) = zerocount(387420489) = 1.
a(10) = zerocount(10^10) = zerocount(10000000000) = 10.
MAPLE
seq(numboccur(0, convert(n^n, base, 10)), n=1 .. 100); # Robert Israel, Aug 05 2014
MATHEMATICA
Map[Count[IntegerDigits[#^#], 0] &, Range[2, 100]] (* Michael De Vlieger, Aug 06 2014 *)
PROG
(Python)
for n in range(1, 10**3):
..print(str(n**n).count('0'), end=', ') # Derek Orr, Aug 05 2014
(PARI) a(n) = my(d = digits(n^n)); sum(i=1, #d, ! d[i]); \\ Michel Marcus, Aug 10 2014
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Anthony Sand, Aug 05 2014
STATUS
approved