OFFSET
1,1
COMMENTS
LINKS
Seiichi Manyama, Table of n, a(n) for n = 1..10000 (terms 1..2999 from R. J. Mathar)
EXAMPLE
19013 is in the sequence because 19013 is prime, 19013 + 18 = 19031 is the next prime, and sum_of_digits(19013) = sum_of_digits(19031) = 14.
PROG
(PARI) {forprime(n=3, 20000, my(m=nextprime(n+1)); if(m-n==18 && sumdigits(n) == sumdigits(m), print1(n, ", ")))} \\ Antonio Roldán, Dec 21 2012
CROSSREFS
KEYWORD
nonn,base,less
AUTHOR
Antonio Roldán, Mar 14 2012
EXTENSIONS
"Correction" of early 2012 undone by R. J. Mathar, Feb 20 2023
STATUS
approved