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.

Previous Showing 61-70 of 113 results. Next

A291436 The arithmetic function u(n,5,8).

Original entry on oeis.org

33, 33, 27, 33, 5, 6, 7, 8, 9, 5, 11, 6, 13, 7, 5, 8, 17, 6, 19, 5, 7, 11, 23, 6, 5, 13, 9, 7, 29, 5, 31, 8, 11, 17, 5, 6, 33, 19, 13, 5, 33, 6, 33, 11, 5, 23, 33, 6, 7, 5, 17, 13, 33, 6, 5, 7, 19, 29, 33, 5, 33, 31, 7, 8, 5, 6, 33, 17, 23, 5
Offset: 1

Views

Author

Robert Price, Aug 23 2017

Keywords

Crossrefs

Programs

  • Mathematica
    u[n_, m_, h_] := (d = Divisors[n]; Min[(h*Ceiling[m/d] - h + 1)*d]); Table[u[n, 5, 8], {n, 1, 70}]

A291467 The arithmetic function u(n,6,2).

Original entry on oeis.org

11, 10, 9, 10, 11, 6, 7, 8, 9, 10, 11, 6, 11, 7, 9, 8, 11, 6, 11, 10, 7, 10, 11, 6, 11, 10, 9, 7, 11, 6, 11, 8, 9, 10, 7, 6, 11, 10, 9, 8, 11, 6, 11, 10, 9, 10, 11, 6, 7, 10, 9, 10, 11, 6, 11, 7, 9, 10, 11, 6, 11, 10, 7, 8, 11, 6, 11, 10, 9, 7
Offset: 1

Views

Author

Robert Price, Aug 24 2017

Keywords

Crossrefs

Programs

  • Mathematica
    u[n_, m_, h_] := (d = Divisors[n]; Min[(h*Ceiling[m/d] - h + 1)*d]); Table[u[n, 6, 2], {n, 1, 70}]

A291468 The arithmetic function u(n,6,3).

Original entry on oeis.org

16, 14, 12, 14, 16, 6, 7, 8, 9, 10, 11, 6, 13, 7, 12, 8, 16, 6, 16, 10, 7, 11, 16, 6, 16, 13, 9, 7, 16, 6, 16, 8, 11, 14, 7, 6, 16, 14, 12, 8, 16, 6, 16, 11, 9, 14, 16, 6, 7, 10, 12, 13, 16, 6, 11, 7, 12, 14, 16, 6, 16, 14, 7, 8, 13, 6, 16, 14, 12, 7
Offset: 1

Views

Author

Robert Price, Aug 24 2017

Keywords

Crossrefs

Programs

  • Mathematica
    u[n_, m_, h_] := (d = Divisors[n]; Min[(h*Ceiling[m/d] - h + 1)*d]); Table[u[n, 6, 3], {n, 1, 70}]

A291469 The arithmetic function u(n,6,4).

Original entry on oeis.org

21, 18, 15, 18, 21, 6, 7, 8, 9, 10, 11, 6, 13, 7, 15, 8, 17, 6, 19, 10, 7, 11, 21, 6, 21, 13, 9, 7, 21, 6, 21, 8, 11, 17, 7, 6, 21, 18, 13, 8, 21, 6, 21, 11, 9, 18, 21, 6, 7, 10, 15, 13, 21, 6, 11, 7, 15, 18, 21, 6, 21, 18, 7, 8, 13, 6, 21, 17, 15, 7
Offset: 1

Views

Author

Robert Price, Aug 24 2017

Keywords

Crossrefs

Programs

  • Mathematica
    u[n_, m_, h_] := (d = Divisors[n]; Min[(h*Ceiling[m/d] - h + 1)*d]); Table[u[n, 6, 4], {n, 1, 70}]

A291470 The arithmetic function u(n,6,5).

Original entry on oeis.org

26, 22, 18, 22, 26, 6, 7, 8, 9, 10, 11, 6, 13, 7, 15, 8, 17, 6, 19, 10, 7, 11, 23, 6, 25, 13, 9, 7, 26, 6, 26, 8, 11, 17, 7, 6, 26, 19, 13, 8, 26, 6, 26, 11, 9, 22, 26, 6, 7, 10, 17, 13, 26, 6, 11, 7, 18, 22, 26, 6, 26, 22, 7, 8, 13, 6, 26, 17, 18, 7
Offset: 1

Views

Author

Robert Price, Aug 24 2017

Keywords

Crossrefs

Programs

  • Mathematica
    u[n_, m_, h_] := (d = Divisors[n]; Min[(h*Ceiling[m/d] - h + 1)*d]); Table[u[n, 6, 5], {n, 1, 70}]

A291471 The arithmetic function u(n,6,6).

Original entry on oeis.org

31, 26, 21, 26, 31, 6, 7, 8, 9, 10, 11, 6, 13, 7, 15, 8, 17, 6, 19, 10, 7, 11, 23, 6, 25, 13, 9, 7, 29, 6, 31, 8, 11, 17, 7, 6, 31, 19, 13, 8, 31, 6, 31, 11, 9, 23, 31, 6, 7, 10, 17, 13, 31, 6, 11, 7, 19, 26, 31, 6, 31, 26, 7, 8, 13, 6, 31, 17, 21, 7
Offset: 1

Views

Author

Robert Price, Aug 24 2017

Keywords

Crossrefs

Programs

  • Mathematica
    u[n_, m_, h_] := (d = Divisors[n]; Min[(h*Ceiling[m/d] - h + 1)*d]); Table[u[n, 6, 6], {n, 1, 70}]

A291472 The arithmetic function u(n,6,7).

Original entry on oeis.org

36, 30, 24, 30, 36, 6, 7, 8, 9, 10, 11, 6, 13, 7, 15, 8, 17, 6, 19, 10, 7, 11, 23, 6, 25, 13, 9, 7, 29, 6, 31, 8, 11, 17, 7, 6, 36, 19, 13, 8, 36, 6, 36, 11, 9, 23, 36, 6, 7, 10, 17, 13, 36, 6, 11, 7, 19, 29, 36, 6, 36, 30, 7, 8, 13, 6, 36, 17, 23, 7
Offset: 1

Views

Author

Robert Price, Aug 24 2017

Keywords

Crossrefs

Programs

  • Mathematica
    u[n_, m_, h_] := (d = Divisors[n]; Min[(h*Ceiling[m/d] - h + 1)*d]); Table[u[n, 6, 7], {n, 1, 70}]

A291473 The arithmetic function u(n,6,8).

Original entry on oeis.org

41, 34, 27, 34, 41, 6, 7, 8, 9, 10, 11, 6, 13, 7, 15, 8, 17, 6, 19, 10, 7, 11, 23, 6, 25, 13, 9, 7, 29, 6, 31, 8, 11, 17, 7, 6, 37, 19, 13, 8, 41, 6, 41, 11, 9, 23, 41, 6, 7, 10, 17, 13, 41, 6, 11, 7, 19, 29, 41, 6, 41, 31, 7, 8, 13, 6, 41, 17, 23, 7
Offset: 1

Views

Author

Robert Price, Aug 24 2017

Keywords

Crossrefs

Programs

  • Mathematica
    u[n_, m_, h_] := (d = Divisors[n]; Min[(h*Ceiling[m/d] - h + 1)*d]); Table[u[n, 6, 8], {n, 1, 70}]

A291474 The arithmetic function u(n,7,2).

Original entry on oeis.org

13, 13, 13, 12, 13, 13, 7, 8, 9, 10, 11, 12, 13, 7, 13, 8, 13, 9, 13, 10, 7, 11, 13, 8, 13, 13, 9, 7, 13, 10, 13, 8, 11, 13, 7, 9, 13, 13, 13, 8, 13, 7, 13, 11, 9, 13, 13, 8, 7, 10, 13, 12, 13, 9, 11, 7, 13, 13, 13, 10, 13, 13, 7, 8, 13, 11, 13, 12, 13, 7
Offset: 1

Views

Author

Robert Price, Aug 24 2017

Keywords

Crossrefs

Programs

  • Mathematica
    u[n_, m_, h_] := (d = Divisors[n]; Min[(h*Ceiling[m/d] - h + 1)*d]); Table[u[n, 7, 2], {n, 1, 70}]

A291475 The arithmetic function u(n,7,3).

Original entry on oeis.org

19, 19, 19, 16, 19, 19, 7, 8, 9, 10, 11, 12, 13, 7, 15, 8, 17, 9, 19, 10, 7, 11, 19, 8, 19, 13, 9, 7, 19, 10, 19, 8, 11, 17, 7, 9, 19, 19, 13, 8, 19, 7, 19, 11, 9, 19, 19, 8, 7, 10, 17, 13, 19, 9, 11, 7, 19, 19, 19, 10, 19, 19, 7, 8, 13, 11, 19, 16, 19, 7
Offset: 1

Views

Author

Robert Price, Aug 24 2017

Keywords

Crossrefs

Programs

  • Mathematica
    u[n_, m_, h_] := (d = Divisors[n]; Min[(h*Ceiling[m/d] - h + 1)*d]); Table[u[n, 7, 3], {n, 1, 70}]
Previous Showing 61-70 of 113 results. Next