login
A078400
Iterated sum-of-digits of A078403(n).
3
2, 3, 5, 7, 2, 5, 2, 5, 7, 2, 5, 7, 7, 2, 7, 2, 5, 5, 2, 5, 7, 5, 2, 2, 7, 2, 5, 7, 5, 2, 7, 2, 5, 5, 7, 2, 7, 5, 7, 2, 7, 5, 2, 5, 5, 7, 7, 2, 7, 2, 2, 5, 5, 7, 5, 2, 2, 5, 7, 5, 7, 2, 5, 2, 7, 2, 7, 7, 7, 5, 5, 5, 2, 2, 7, 2, 5, 7, 2, 2, 5, 2, 5, 2, 7, 5, 2, 5, 7, 5, 7, 7, 7, 2, 5, 2, 7, 2, 2, 5, 7, 2, 5, 7, 7
OFFSET
1,1
LINKS
Cino Hilliard, Proof of the Digital Root Theorem, posted on Yahoo group B2LCC, Feb 17 2003
PROG
(PARI) drp(n) = { forprime(x=2, n, r = x%9; if(isprime(r), print1(r" "); ); ); }
CROSSREFS
Sequence in context: A111309 A007605 A077765 * A068951 A139752 A238191
KEYWORD
easy,nonn,base
AUTHOR
Cino Hilliard, Dec 24 2002
EXTENSIONS
More terms from Joshua Zucker, Jul 24 2006
STATUS
approved