OFFSET
1,1
COMMENTS
The sequence begins with 8438 9-digit numbers.
Then there are 739572 10-digit numbers.
All terms == 7 (mod 18).
LINKS
T. D. Noe, Table of n, a(n) for n = 1..8438
MATHEMATICA
Select[Prime[Range[3*10^8]], Total[IntegerDigits[#]]==70 &] (* Vincenzo Librandi, Jul 09 2014 *)
PROG
(Magma) [p: p in PrimesUpTo(3*10^8) | &+Intseq(p) eq 70]; // Vincenzo Librandi, Jul 09 2014
(Python) # see code in A107579 which can be used to produce this sequence by giving the initial term p = 189997999 (or 8*10**7-1, for digit sum 70). - M. F. Hasler, Mar 16 2022
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Zak Seidov, Jan 26 2011
STATUS
approved