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-5 of 5 results.

A028815 a(n) = prime(n) + 1 (starting with 1).

Original entry on oeis.org

2, 3, 4, 6, 8, 12, 14, 18, 20, 24, 30, 32, 38, 42, 44, 48, 54, 60, 62, 68, 72, 74, 80, 84, 90, 98, 102, 104, 108, 110, 114, 128, 132, 138, 140, 150, 152, 158, 164, 168, 174, 180, 182, 192, 194, 198, 200, 212, 224, 228, 230, 234, 240, 242, 252, 258, 264, 270, 272, 278, 282, 284
Offset: 0

Views

Author

N. J. A. Sloane

Keywords

Comments

n-th noncomposite (unit or prime) positive integer + 1.
The "0th prime" is defined to be 1 (a unit, formerly considered to be prime).

Links

Crossrefs

Cf. A000040, A006093, A008578, A008864.
Cf. A141130, A141132, A141133, A141136, A141138.

Programs

Formula

a(n) = prime(n) + 1 = A000040(n) + 1 = A008864(n) for n >= 1.
a(n) = A008578(n+1) + 1, n >= 0.
a(n) = 2*A006254(n-1), for n >= 2, with a(0) = 2, a(1) = 3. - G. C. Greubel, Aug 05 2024

A141130 a(n) = prime(prime(prime(prime(prime(A028815(n) - 1) - 1) - 1) - 1) - 1) - 1.

Original entry on oeis.org

1, 2, 150, 4210, 12496, 43206, 83046, 161092, 202966, 305068, 498936, 633160, 906426, 1125418, 1248412, 1460566, 1808478, 2264752, 2339136, 3026112, 3331266, 3501748, 4015168, 4529520, 5049852, 5806336, 6448536, 6792726, 7214610
Offset: 0

Views

Author

Juri-Stepan Gerasimov, Jul 31 2008

Keywords

Links

Crossrefs

Cf. A000040, A028815, A141132, A141133, A141136, A141138.

Programs

  • Magma
    p:=NthPrime;
A141130:= func< n | n eq 0 select 1 else p(p(p(p(p(p(n))-1)-1)-1)-1)-1 >;
[A141130(n): n in [0..50]]; // G. C. Greubel, Aug 05 2024
  • Mathematica
    A141130[n_]:= With[{p=Prime}, If[n==0, 1, p[p[p[p[p[p[n]]-1]-1]-1]-1]-1 ]];
Table[A141130[n], {n,0,60}] (* G. C. Greubel, Aug 05 2024 *)
  • SageMath
    p=nth_prime
def A141130(n): return 1 if n==0 else p(p(p(p(p(p(n))-1)-1)-1)-1)-1
[A141130(n) for n in range(51)] # G. C. Greubel, Aug 05 2024

Formula

a(n) = prime(prime(prime(prime(prime(prime(n)) - 1) - 1) - 1) - 1) - 1, with a(0) = 1. - G. C. Greubel, Aug 05 2024

Extensions

More terms from D. S. McNeil, Mar 21 2009
Offset changed by G. C. Greubel, Aug 05 2024

A141132 a(n) = prime(prime(prime(prime(A028815(n) - 1) - 1) - 1) - 1) - 1.

Original entry on oeis.org

1, 2, 36, 576, 1492, 4512, 8110, 14778, 18222, 26416, 41452, 51576, 71740, 87552, 96352, 111372, 135660, 167106, 172152, 218550, 238990, 250252, 284148, 317856, 351706, 400408, 441478, 463398, 490246, 505780, 527280, 643990, 679036, 718182
Offset: 0

Views

Author

Juri-Stepan Gerasimov, Jul 31 2008

Keywords

Links

Crossrefs

Cf. A000040, A028815, A141130, A141133, A141136, A141138.

Programs

  • Magma
    p:=NthPrime;
A141132:= func< n | n eq 0 select 1 else p(p(p(p(p(n))-1)-1)-1)-1 >;
[A141132(n): n in [0..50]]; // G. C. Greubel, Aug 05 2024
  • Mathematica
    A141132[n_]:= With[{p=Prime}, If[n==0, 1, p[p[p[p[p[n]]-1]-1]-1]-1 ]];
Table[A141132[n], {n, 0, 60}] (* G. C. Greubel, Aug 05 2024 *)
  • SageMath
    p=nth_prime
def A141132(n): return 1 if n==0 else p(p(p(p(p(n))-1)-1)-1)-1
[A141132(n) for n in range(51)] # G. C. Greubel, Aug 05 2024

Formula

a(n) = prime(prime(prime(prime(prime(n)) - 1) - 1) - 1) - 1, with a(0) = 1. - G. C. Greubel, Aug 05 2024

Extensions

Extended by D. S. McNeil, Mar 21 2009
Offset changed by G. C. Greubel, Aug 05 2024

A141136 a(n) = prime(prime(A028815(n) - 1) - 1) - 1.

Original entry on oeis.org

1, 2, 6, 28, 52, 112, 172, 270, 316, 420, 592, 700, 910, 1060, 1150, 1290, 1510, 1782, 1830, 2212, 2376, 2472, 2740, 2998, 3256, 3630, 3930, 4078, 4270, 4390, 4546, 5350, 5590, 5866, 6100, 6658, 6802, 7186, 7602, 7828, 8218, 8520, 8712, 9310, 9438, 9732
Offset: 0

Views

Author

Juri-Stepan Gerasimov, Jul 31 2008

Keywords

Links

Crossrefs

Cf. A000040, A028815, A141130, A141132, A141133, A141138.

Programs

  • Magma
    p:=NthPrime;
A141136:= func< n | n eq 0 select 1 else p(p(p(n))-1) -1 >;
[A141136(n): n in [0..50]]; // G. C. Greubel, Aug 05 2024
  • Mathematica
    A141136[n_]:= With[{p=Prime}, If[n==0, 1, p[p[p[n]]-1]-1]];
Table[A141136[n], {n,0,60}] (* G. C. Greubel, Aug 05 2024 *)
  • SageMath
    p=nth_prime
def A141136(n): return 1 if n==0 else p(p(p(n))-1)-1
[A141136(n) for n in range(51)] # G. C. Greubel, Aug 05 2024

Formula

a(n) = A000040(A000040(A000040(n)) - 1) - 1, with a(0) = 1. - G. C. Greubel, Aug 05 2024

Extensions

Corrected and extended by D. S. McNeil, Mar 21 2009
Offset changed by G. C. Greubel, Aug 05 2024

A141138 a(n) = prime(A028815(n) - 1) - 1.

Original entry on oeis.org

1, 2, 4, 10, 16, 30, 40, 58, 66, 82, 108, 126, 156, 178, 190, 210, 240, 276, 282, 330, 352, 366, 400, 430, 460, 508, 546, 562, 586, 598, 616, 708, 738, 772, 796, 858, 876, 918, 966, 990, 1030, 1062, 1086, 1152, 1170, 1200, 1216, 1296, 1408, 1432, 1446, 1470
Offset: 0

Views

Author

Juri-Stepan Gerasimov, Jul 31 2008

Keywords

Links

Crossrefs

Cf. A028815, A141130, A141132, A141133, A141136.

Programs

Formula

a(n) = A000040(A000040(n)) - 1, with a(0) = 1. - G. C. Greubel, Aug 05 2024

Extensions

a(14), a(28) corrected by D. S. McNeil, Mar 21 2009
Offset changed by G. C. Greubel, Aug 05 2024
Showing 1-5 of 5 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.