OFFSET
1,1
COMMENTS
Primes in A232766.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
107 is a member of this sequence because 107 is prime and 107987654321 is prime.
MATHEMATICA
With[{r=Range[9, 1, -1]}, Select[Prime[Range[500]], PrimeQ[FromDigits[ Join[ IntegerDigits[#], r]]]&]] (* Harvey P. Dale, Jul 31 2014 *)
PROG
(Python)
from sympy import isprime
{print(n, end=', ') for n in range(10**4) if isprime(n) and isprime(int(str(n)+"987654321"))}
# Simplified by Derek Orr, Apr 10 2015
(PARI) forprime(p=1, 10^4, if(isprime(eval(concat(Str(p), "987654321"))), print1(p, ", "))) \\ Derek Orr, Apr 10 2015
(Magma) [NthPrime(n): n in [0..500] | IsPrime(Seqint(Intseq(987654321) cat Intseq(NthPrime(n))))]; // Vincenzo Librandi, Apr 11 2015
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Derek Orr, Nov 29 2013
STATUS
approved