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-10 of 15 results. Next

A102145 Iccanobirt prime indices (15 of 15): Indices of prime numbers in A102125.

Original entry on oeis.org

4, 6, 7, 11, 30, 31, 50, 64, 77, 146, 163, 185, 210, 354, 367, 402, 3137, 3228, 3639, 11756, 22054, 23126
Offset: 1

Views

Author

Jonathan Vos Post and Ray Chandler, Dec 31 2004

Keywords

Comments

No more terms through 5000.
a(23) > 50000. - Robert Price, Nov 11 2018

Crossrefs

Programs

  • Mathematica
    a[n_] := a[n] =
       IntegerReverse[IntegerReverse[a[n - 1]] + IntegerReverse[a[n - 2]] +
         IntegerReverse[a[n - 3]]];
    a[0] = 0; a[1] = 0; a[2] = 1;
    Select[Range[0, 5000], PrimeQ[a[#]] &] (* Robert Price, Apr 10 2020 *)

Formula

A102125(a(n)) = A102165(n).

Extensions

a(20)-a(22) from Robert Price, Nov 11 2018

A102151 Iccanobirt primes (1 of 15): Prime numbers in A102111.

Original entry on oeis.org

2, 7, 13, 33049, 118852511, 4737081270498735525597185686764838592126526518160799, 1077332507131387702854919470217222614007309564248616024722926341483527602546317
Offset: 1

Views

Author

Jonathan Vos Post and Ray Chandler, Dec 31 2004

Keywords

Crossrefs

Formula

a(n) = A102111(A102131(n)).

A102152 Iccanobirt primes (2 of 15): Prime numbers in A102112.

Original entry on oeis.org

2, 7, 13, 167, 1843406868619, 567512739603223, 1125599723626314594798370059933052227890281327798090340341843
Offset: 1

Views

Author

Jonathan Vos Post and Ray Chandler, Dec 31 2004

Keywords

Comments

Next term is too large to include.
The next term (a(8)) has 394 digits. The term after that (a(9)) has 1063 digits, and a(10) has 2599 digits. - Harvey P. Dale, Dec 26 2022

Crossrefs

Programs

  • Mathematica
    nxt[{a_,b_,c_}]:={b,c,a+FromDigits[Reverse[IntegerDigits[b]]]+c};Select[NestList[nxt,{0,0,1},200][[All,1]],PrimeQ] (* Harvey P. Dale, Dec 26 2022 *)

Formula

a(n) = A102112(A102132(n)).

Extensions

Offset changed to 1 by Jinyuan Wang, Aug 08 2021

A102164 Iccanobirt primes (14 of 15): Prime numbers in A102124.

Original entry on oeis.org

2, 7, 31, 823, 8359081, 838645835501, 3454952325449641, 39037487994583246494995203209075812905781919221, 3849036379333595071904298941172131921008511669448798002135139108572992781805641
Offset: 1

Views

Author

Jonathan Vos Post and Ray Chandler, Dec 31 2004

Keywords

Crossrefs

Formula

a(n) = A102124(A102144(n)).

Extensions

Offset changed to 1 by Jinyuan Wang, Aug 15 2021

A102153 Iccanobirt primes (3 of 15): Prime numbers in A102113.

Original entry on oeis.org

2, 7, 13, 27283111, 2758358381, 20271711015483107, 15021910462548628626464091829722269
Offset: 1

Views

Author

Jonathan Vos Post and Ray Chandler, Dec 31 2004

Keywords

Comments

Next term is too large to include.

Crossrefs

Formula

a(n) = A102113(A102133(n)).

A102154 Iccanobirt primes (4 of 15): Prime numbers in A102114.

Original entry on oeis.org

2, 7, 13, 823541, 131622637, 42562230754481, 81409990081365019, 854720149266848129, 10368894671263026260137261, 462512205427594928694039517, 2554464709394644494293414485734745657, 10316628799362671595219100337312778857284159, 124041034096767708661687005571699720680324204493
Offset: 1

Views

Author

Jonathan Vos Post and Ray Chandler, Dec 31 2004

Keywords

Crossrefs

Programs

  • Mathematica
    nxt[{a_, b_, c_}] := {b, c, IntegerReverse[c] + b + a}; Select[ NestList[ nxt, {0, 0, 1}, 400][[ All, 1]], PrimeQ] (* Harvey P. Dale, Apr 14 2022 *)

Formula

a(n) = A102114(A102134(n)).

Extensions

Offset changed to 1 and more terms from Jinyuan Wang, Aug 10 2021

A102155 Iccanobirt primes (5 of 15): Prime numbers in A102115.

Original entry on oeis.org

2, 7, 13, 541549, 6058778554555591
Offset: 1

Views

Author

Jonathan Vos Post and Ray Chandler, Dec 31 2004

Keywords

Comments

Next term is too large to include.

Crossrefs

Formula

a(n) = A102115(A102135(n)).

Extensions

Offset changed to 1 by Jinyuan Wang, Aug 12 2021

A102156 Iccanobirt primes (6 of 15): Prime numbers in A102116.

Original entry on oeis.org

2, 7, 13, 499, 943819, 8512981, 75957608989028496534122437859061890223391739
Offset: 1

Views

Author

Jonathan Vos Post and Ray Chandler, Dec 31 2004

Keywords

Comments

Next term is too large to include.

Crossrefs

Formula

a(n) = A102116(A102136(n)).

Extensions

Offset changed to 1 by Jinyuan Wang, Aug 12 2021

A102157 Iccanobirt primes (7 of 15): Prime numbers in A102117.

Original entry on oeis.org

2, 7, 13, 87517, 2891668030768721, 70625274624238913, 103865292721379353050549556815505213549, 8541928234907492663056090579782886424256601
Offset: 1

Views

Author

Jonathan Vos Post and Ray Chandler, Dec 31 2004

Keywords

Comments

Next term is too large to include.
The next term has 231 digits. - Harvey P. Dale, Dec 16 2021

Crossrefs

Programs

  • Mathematica
    nxt[{a_,b_,c_}]:={b,c,Total[IntegerReverse/@{a,b,c}]};Select[NestList[nxt,{0,0,1},200][[All,1]],PrimeQ] (* Harvey P. Dale, Dec 16 2021 *)

Formula

a(n) = A102117(A102137(n)).

Extensions

Offset changed to 1 by Jinyuan Wang, Aug 12 2021

A102158 Iccanobirt primes (8 of 15): Prime numbers in A102118.

Original entry on oeis.org

2, 7, 31, 31, 97885807, 7105083736241465849989, 386010207538170887319192908532941, 797921272502602257281628706183144343679532451
Offset: 1

Views

Author

Jonathan Vos Post and Ray Chandler, Dec 31 2004

Keywords

Comments

Next term is too large to include.

Crossrefs

Formula

a(n) = A102118(A102138(n)).

Extensions

Offset changed to 1 by Jinyuan Wang, Aug 14 2021
Showing 1-10 of 15 results. Next