OFFSET
1,1
COMMENTS
LINKS
K. D. Bajpai, Table of n, a(n) for n = 1..2250
EXAMPLE
5711 is in the sequence because the concatenation of [5, 7, 11] = 5711 which is prime. The sum [5 + 7 + 11] = 23 is another prime.
111317 is in the sequence because the concatenation of [11, 13, 17] = 111317 which is prime. The sum [11 + 13 + 17] = 41 is another prime.
MAPLE
MATHEMATICA
prQ[{a_, b_, c_}]:=Module[{p=FromDigits[Flatten[IntegerDigits/@ {a, b, c}]]}, If[ AllTrue[ {p, a+b+c}, PrimeQ], p, Nothing]]; prQ/@Partition[ Prime[ Range[ 500]], 3, 1] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jan 05 2021 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
K. D. Bajpai, Jun 21 2014
STATUS
approved