A173268 Fibonacci numbers that produce primes when their digits are reversed.

2, 3, 5, 13, 34, 377, 1597, 10946, 75025, 121393, 17167680177565, 135301852344706746049, 1672445759041379840132227567949787325, 3691087032412706639440686994833808526209

Offset: 1

Author

Harvey P. Dale, Feb 14 2010

Keywords

• base
• nice
• nonn

Crossrefs

Cf. A036971. [T. D. Noe, Mar 19 2010]

Programs

Mathematica

okQ[n_]:=PrimeQ[FromDigits[Reverse[IntegerDigits[n]]]]; Select[ Fibonacci[ Range[500]],okQ]
Select[Fibonacci[Range[500]],PrimeQ[IntegerReverse[#]]&] (* Harvey P. Dale, Oct 16 2021 *)