OFFSET
1,1
LINKS
Paul Tek, Table of n, a(n) for n = 1..10000
EXAMPLE
2423 is a prime and a concatenation of 24 and 23.
MATHEMATICA
Sort[Select[FromDigits[Flatten[IntegerDigits/@#]]&/@Partition[ Range[ 300, 1, -1], 2, 1], PrimeQ]] (* Harvey P. Dale, May 09 2012 *)
PROG
(PARI) for(n=4, 1e4, if(isprime(t=eval(Str(n, n-1))), print1(t", "))) \\ Charles R Greathouse IV, May 07 2013
(Magma) [Seqint(Intseq(n-1) cat Intseq(n)): n in [2..300 by 2] | IsPrime(Seqint(Intseq(n-1) cat Intseq(n)))]; // Marius A. Burtea, Mar 21 2019
(Python)
from sympy import isprime
from itertools import count, islice
def agen(): yield from filter(isprime, (int(str(k)+str(k-1)) for k in count(2, 2)))
print(list(islice(agen(), 36))) # Michael S. Branicky, Aug 05 2022
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Jan 15 2000
STATUS
approved