OFFSET
1,1
EXAMPLE
MAPLE
read("transforms") ; A007605 := proc(n) digsum(ithprime(n)) ; end:
for n from 1 to 300 do p := A136251(n); if isprime(p) then printf("%d, ", p) ; fi; od: # R. J. Mathar, Aug 02 2009
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Juri-Stepan Gerasimov, Jun 23 2009
EXTENSIONS
Edited, corrected and extended by R. J. Mathar, Aug 02 2009
STATUS
approved