OFFSET
1,1
LINKS
Michael S. Branicky, Table of n, a(n) for n = 1..10000
EXAMPLE
The first term is 6427 which is a prime and is the reverse concatenation of 27 and 64 which are two consecutive cubes.
MATHEMATICA
rcat[{a_, b_}]:=FromDigits[Join[IntegerDigits[b], IntegerDigits[a]]]; Select[ rcat/@Partition[Range[500]^3, 2, 1], PrimeQ] (* Harvey P. Dale, Feb 21 2012 *)
PROG
(Python)
from sympy import isprime
def aupton(terms):
alst, i, s2 = [], 1, "1"
while len(alst) < terms:
i += 1
s1, s2 = s2, str(i**3)
t = int(s2+s1)
if isprime(t):
alst.append(t)
return alst
print(aupton(16)) # Michael S. Branicky, Jan 08 2022
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Shyam Sunder Gupta, Apr 17 2005
EXTENSIONS
a(15)-a(16) from Lorenzo Pinlac, Jan 08 2022
STATUS
approved