cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-3 of 3 results.

A036797 Iccanobif (or iccanobiF) primes: primes which are Fibonacci numbers when reversed.

Original entry on oeis.org

2, 3, 5, 31, 43, 773, 7951, 52057, 64901, 393121, 56577108676171, 940647607443258103531, 5237879497657222310489731409575442761, 9026258083384996860449366072142307801963, 19900335674812302969315720344396951060628175943800862267761734431012073266446403
Offset: 1

Views

Author

G. L. Honaker, Jr.

Keywords

Comments

The next term has 104 digits. - Harvey P. Dale, Jul 24 2013

Crossrefs

Cf. A036971, A036972.

Programs

  • Mathematica
    Sort[Select[FromDigits[Reverse[IntegerDigits[#]]]&/@ Fibonacci[ Range[ 500]],PrimeQ]] (* Harvey P. Dale, Jul 24 2013 *)

Extensions

Additional term from Harvey P. Dale, Jul 24 2013

A036972 Numbers k such that the k-th prime is a Fibonacci number reversed.

Original entry on oeis.org

1, 2, 3, 11, 14, 137, 1005, 5324, 6486, 33326, 1847020051726, 19899051754834984670
Offset: 1

Views

Author

N. J. A. Sloane, G. L. Honaker, Jr.

Keywords

Comments

More terms could be obtained from A036971.
The next reversed Fibonacci number which is a prime number is 940647607443258103531. The next term in the sequence would be the prime index for that prime. - Harvey P. Dale, Jun 02 2009

Links

Crossrefs

Cf. A036797, A036971.

Programs

  • Mathematica
    Sort[PrimePi/@(Select[FromDigits[Reverse[IntegerDigits[ # ]]]&/@Fibonacci[Range[90]],PrimeQ])] (* Harvey P. Dale, Jun 02 2009 *)

Extensions

One additional term from Harvey P. Dale, Jun 02 2009
Offset corrected and a(12) added using Kim Walisch's primecount by Amiram Eldar, May 06 2024

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

Original entry on oeis.org

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

Views

Author

Harvey P. Dale, Feb 14 2010

Keywords

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 *)
Showing 1-3 of 3 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.