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.

A147966 a(n) = n+(A001223(n)-1) = n+A046933(n).

Original entry on oeis.org

1, 3, 4, 7, 6, 9, 8, 11, 14, 11, 16, 15, 14, 17, 20, 21, 18, 23, 22, 21, 26, 25, 28, 31, 28, 27, 30, 29, 32, 43, 34, 37, 34, 43, 36, 41, 42, 41, 44, 45, 42, 51, 44, 47, 46, 57, 58, 51, 50, 53, 56, 53, 62, 59, 60, 61, 58, 63, 62, 61, 70, 75, 66, 65, 68, 79, 72, 77
Offset: 1

Views

Author

Omar E. Pol, Nov 17 2008

Keywords

Examples

			a(32) = A001223(32)-1+n = 6-1+32 = A046933(32)+n = 5+n = 37.
		

Crossrefs

Extensions

Definition clarified by N. J. A. Sloane, Nov 22 2021 at the suggestion of Harvey P. Dale.
a(32)=37 corrected by Georg Fischer, Oct 10 2024

A147967 a(n) = n*(A001223(n)-1) = n*A046933(n).

Original entry on oeis.org

0, 2, 3, 12, 5, 18, 7, 24, 45, 10, 55, 36, 13, 42, 75, 80, 17, 90, 57, 20, 105, 66, 115, 168, 75, 26, 81, 28, 87, 390, 93, 160, 33, 306, 35, 180, 185, 114, 195, 200, 41, 378, 43, 132, 45, 506, 517, 144, 49, 150, 255, 52, 477
Offset: 1

Views

Author

Omar E. Pol, Nov 17 2008

Keywords

Crossrefs

Cf. A001223 ("gap" with its usual meaning), A046933, A141042, A147965, A147966.

Programs

  • Mathematica
    Module[{nn=60,gps},gps=Differences[Prime[Range[nn+1]]]-1;Times@@@ Thread[ {Range[nn],gps}]] (* Harvey P. Dale, Nov 07 2020 *)

Extensions

Definition clarified by N. J. A. Sloane, Nov 22 2021 at the suggestion of Harvey P. Dale.
Showing 1-2 of 2 results.