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

A092602 A093572 with duplicates removed.

Original entry on oeis.org

3, 5, 11, 19, 31, 79, 101, 113, 127, 163, 173, 223, 271, 383, 419, 431, 503, 571, 599, 619, 641, 659, 673, 683, 701, 733, 757, 827, 863, 971, 1013, 1033, 1087, 1193, 1249, 1423, 1433, 1453, 1483, 1579, 1621, 1667, 1723, 2003, 2113, 2179
Offset: 1

Views

Author

Robert G. Wilson v, Apr 07 2004

Keywords

A093570 a(n) = Product_{k=1..n}(k + prime(k)).

Original entry on oeis.org

3, 15, 120, 1320, 21120, 401280, 9630720, 260029440, 8320942080, 324516741120, 13629703127040, 667855453224960, 36064194474147840, 2055659085026426880, 127450863271638466560, 8794109565743054192640, 668352326996472118640640
Offset: 1

Views

Author

Reinhard Zumkeller, Apr 01 2004

Keywords

Comments

a(n) < A000142(n) + A002110(n) for n>1;
a(n) = Product_{k=1..n}A014688(k).

Links

Crossrefs

Cf. A093572, A093571.

Programs

  • Mathematica
    Table[ Product[k + Prime[k], {k, n}], {n, 17}] (* Robert G. Wilson v, Apr 07 2004 *)
FoldList[Times,Table[m+Prime[m],{m,20}]] (* Harvey P. Dale, Jun 04 2023 *)

Extensions

More terms from Robert G. Wilson v, Apr 07 2004

A093571 LeastCommonMultiple({k+prime(k): 1<=k<=n}).

Original entry on oeis.org

3, 15, 120, 1320, 2640, 50160, 50160, 451440, 902880, 11737440, 82162080, 575134560, 575134560, 575134560, 17829171360, 410070941280, 410070941280, 32395604361120, 1393010987528160, 1393010987528160, 65471516413823520
Offset: 1

Views

Author

Reinhard Zumkeller, Apr 01 2004

Keywords

Comments

a(n) <= A093570(n).

Crossrefs

Cf. A093572, A014688.

Programs

  • Mathematica
    Table[LCM @@ Table[k + Prime[k], {k, n}], {n, 21}] (* Robert G. Wilson v, Apr 07 2004 *)

Extensions

More terms from Robert G. Wilson v, Apr 07 2004

A076556 Greatest prime divisor of n-th prime + n.

Original entry on oeis.org

3, 5, 2, 11, 2, 19, 3, 3, 2, 13, 7, 7, 3, 19, 31, 23, 19, 79, 43, 13, 47, 101, 53, 113, 61, 127, 13, 5, 23, 13, 79, 163, 17, 173, 23, 17, 97, 67, 103, 71, 11, 223, 13, 79, 11, 7, 43, 271, 23, 31, 71, 97, 7, 61, 13, 29, 163, 47, 7, 31, 43, 71, 37, 5, 7, 383, 199, 5, 13, 419
Offset: 1

Views

Author

Zak Seidov, Oct 19 2002

Keywords

Crossrefs

Cf. A093572, A014688.

Programs

  • Mathematica
    Table[FactorInteger[Prime[n]+n][[-1,1]],{n,70}] (* Harvey P. Dale, Jan 19 2015 *)
Showing 1-4 of 4 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.