A345956 Primes whose reverse is the square of a Fibonacci number.
1297, 921241, 186331288599111530713519, 98866853184420632874393761586063024530467395043
Offset: 1
Examples
The reverse of 1297 is 7921 = 89^2, where 89 is a Fibonacci number. Thus 1297 is in this sequence.
Crossrefs
Programs
-
Mathematica
Select[IntegerReverse/@(Fibonacci@Range@1000^2),PrimeQ] (* Giorgos Kalogeropoulos, Jun 30 2021 *)
-
PARI
for(k=3,200,my(f=fibonacci(k)^2,fi=fromdigits(Vecrev(digits(f))));if(isprime(fi),print1(fi,", "))) \\ Hugo Pfoertner, Jun 30 2021
-
Python
from sympy import fibonacci, isprime def rev(n): return int(str(n)[::-1]) def auptok(klimit): return [t for t in (rev(fibonacci(k)**2) for k in range(3, klimit+1)) if isprime(t)] print(auptok(200)) # Michael S. Branicky, Jun 30 2021