OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..2000
EXAMPLE
Prime(36)=151 and abs(1+5+1-(3+6)) = abs(7-9) = 2 (a prime), so 151 is in the sequence.
Prime(37)=157 and abs(1+5+7-(3+7)) = abs(13-10) = 3 (a prime), so 157 is in the sequence.
MAPLE
MATHEMATICA
Transpose[Select[Table[{n, Prime[n]}, {n, 200}], PrimeQ[Abs[Total[ IntegerDigits[ #[[2]]]] -Total[IntegerDigits[#[[1]]]]]]&]][[2]] (* Harvey P. Dale, Jan 27 2013 *)
CROSSREFS
KEYWORD
nonn,base,less
AUTHOR
Juri-Stepan Gerasimov, Jan 06 2009
EXTENSIONS
103, 113 etc. inserted by R. J. Mathar, Jan 07 2009
Name edited by Jon E. Schoenfield, Jan 06 2019
STATUS
approved