OFFSET
1,23
COMMENTS
This is A064692 restricted to the primes.
LINKS
Rémy Sigrist, Table of n, a(n) for n = 1..10000
PROG
(PARI) forprime (p=2, 439, print1 (vecsum(apply(d -> [1, 0, 0, 0, 1, 0, 1, 0, 2, 1][1+d], digits(p))) ", ")) \\ Rémy Sigrist, Sep 27 2019
CROSSREFS
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Sep 27 2019
STATUS
approved