A191248 The number of times that the n-th digit of A019518(n) occurs in A019518(n).
1, 1, 1, 1, 2, 3, 4, 2, 5, 2, 6, 2, 3, 6, 3, 2, 7, 8, 7, 6, 3, 9, 3, 9, 3, 9, 3, 10, 3, 7, 2, 19, 2, 12, 12, 24, 13, 15, 14, 9, 2, 16, 3, 12, 13, 17, 38, 4, 38, 38, 4, 21, 39, 4, 19, 40, 4, 18, 41, 42, 23, 42, 23, 23, 45, 29, 47, 47, 34, 26, 47, 38, 21, 47, 7
Offset: 1
Links
- Nathaniel Johnston, Table of n, a(n) for n = 1..10000
Programs
-
Maple
with(StringTools): lim:=100: s:="": for j from 1 to lim do s:=cat(s, convert(ithprime(j),string)): printf("%d, ", nops([SearchAll(s[j], s)])); od: # Nathaniel Johnston, May 28 2011
Extensions
Corrected and extended by Nathaniel Johnston, May 28 2011