OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
(5,7,11) is the first prime triple and their concatenation 5711 is prime, so 5 is a term of sequence.
(11,13,17) is the second prime triple and their concatenation 111317 is prime, so 11 is a term of sequence.
MAPLE
q:= p-> andmap(isprime, [p+2, p+6, parse(cat(p, p+2, p+6))]):
select(q, [ithprime(i)$i=1..20225])[]; # Alois P. Heinz, Jan 29 2026
MATHEMATICA
Transpose[Select[Partition[Prime[Range[20000]], 3, 1], Differences[#]=={2, 4} && PrimeQ[ FromDigits[Flatten[IntegerDigits/@#]]]&]][[1]] (* Harvey P. Dale, Apr 10 2013 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Ulrich Krug (leuchtfeuer37(AT)gmx.de), Mar 31 2010
STATUS
approved
