Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A345956
Primes whose reverse is the square of a Fibonacci number.
0
1297, 921241, 186331288599111530713519, 98866853184420632874393761586063024530467395043
OFFSET
1,1
EXAMPLE
The reverse of 1297 is 7921 = 89^2, where 89 is a Fibonacci number. Thus 1297 is in this sequence.
MATHEMATICA
Select[IntegerReverse/@(Fibonacci@Range@1000^2), PrimeQ] (* Giorgos Kalogeropoulos, Jun 30 2021 *)
PROG
(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
CROSSREFS
Cf. A007488 (primes whose reversal is a square), A036797 (Iccanobif primes).
Sequence in context: A358648 A256834 A031750 * A031534 A252468 A135125
KEYWORD
nonn,base
AUTHOR
Tanya Khovanova, Jun 30 2021
STATUS
approved