login
A173268
Fibonacci numbers that produce primes when their digits are reversed.
1
2, 3, 5, 13, 34, 377, 1597, 10946, 75025, 121393, 17167680177565, 135301852344706746049, 1672445759041379840132227567949787325, 3691087032412706639440686994833808526209
OFFSET
1,1
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 *)
CROSSREFS
Cf. A036971. [T. D. Noe, Mar 19 2010]
Sequence in context: A345076 A353582 A233515 * A141179 A215314 A079147
KEYWORD
base,nice,nonn
AUTHOR
Harvey P. Dale, Feb 14 2010
STATUS
approved