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

A176246 a(n) = A001223(n+1) - 1.

Original entry on oeis.org

1, 1, 3, 1, 3, 1, 3, 5, 1, 5, 3, 1, 3, 5, 5, 1, 5, 3, 1, 5, 3, 5, 7, 3, 1, 3, 1, 3, 13, 3, 5, 1, 9, 1, 5, 5, 3, 5, 5, 1, 9, 1, 3, 1, 11, 11, 3, 1, 3, 5, 1, 9, 5, 5, 5, 1, 5, 3, 1, 9, 13, 3, 1, 3, 13, 5, 9, 1, 3, 5, 7, 5, 5, 3, 5, 7, 3, 7, 9, 1, 9, 1, 5, 3, 5, 7, 3, 1, 3, 11, 7, 3, 7
Offset: 1

Views

Author

Edmund Algeo, Apr 13 2010

Keywords

Comments

Previous name was: Numbers which added to an odd prime plus one, yield the next prime in the series for primes.
Essentially a duplicate of A046933 and A135732. - T. D. Noe, Oct 23 2013

Crossrefs

Cf. A046933 (number of composites between successive primes).

Programs

  • Mathematica
    Differences[Prime[Range[2, 100]]] - 1 (* Paolo Xausa, Jul 02 2025 *)

Formula

a(n) = A001223(n+1) - 1. - Michel Marcus, Jun 08 2013

Extensions

New name using formula from Michel Marcus, Joerg Arndt, Oct 22 2013

A135731 a(1) = 3; thereafter a(n+1) = a(n) + nextprime(a(n)) - prevprime(a(n)).

Original entry on oeis.org

3, 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
Offset: 1

Views

Author

Enoch Haga, Nov 26 2007

Keywords

Comments

Essentially the same as A008864. [From R. J. Mathar, Oct 28 2008]
Only the first term is prime, the rest are even, and between any pair of adjacent terms a(n) and a(n+1), there is just one prime, namely prime(n+2). - David James Sycamore, Dec 07 2018

Examples

			a(1) = 3, so a(2) = 3 + (5-2)  = 6,
a(3) = 6 + (7-5) = 8,
a(4) = 8 + (11-7) = 12; etc.
		

Crossrefs

Programs

  • Mathematica
    NestList[#+NextPrime[#]-NextPrime[#,-1]&,3,60] (* Harvey P. Dale, Oct 13 2024 *)

Formula

a(n+1) = a(n) + A001223(n+1) for n>1. - David James Sycamore, Dec 07 2018

Extensions

Definition corrected and entry revised by David James Sycamore, Dec 07 2018
Showing 1-2 of 2 results.