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 11-20 of 20 results.

A065482 a(n) = round( 2^n/n ).

Original entry on oeis.org

2, 2, 3, 4, 6, 11, 18, 32, 57, 102, 186, 341, 630, 1170, 2185, 4096, 7710, 14564, 27594, 52429, 99864, 190650, 364722, 699051, 1342177, 2581110, 4971027, 9586981, 18512790, 35791394, 69273666, 134217728, 260301048, 505290270, 981706811, 1908874354, 3714566310
Offset: 1

Views

Author

N. J. A. Sloane, Dec 03 2001

Keywords

Crossrefs

Programs

  • Magma
    [Round(2^n/n): n in [1..30]]; // G. C. Greubel, Jan 18 2018
    
  • Mathematica
    Table[Floor[(Floor[n/2]+2^n)/n], {n, 1, 100}]
  • PARI
    a(n) = { round(2^n/n) } \\ Harry J. Smith, Oct 20 2009
    
  • Python
    def A065482(n): return ((1<>1))//n # Chai Wah Wu, Apr 23 2025

Formula

a(n) = A082894(n)/n.
a(n) = floor((2^n + floor(n/2))/n).

A128093 a(n) = smallest multiple of n which is >= 2^n.

Original entry on oeis.org

2, 4, 9, 16, 35, 66, 133, 256, 513, 1030, 2057, 4104, 8203, 16394, 32775, 65536, 131087, 262152, 524305, 1048580, 2097165, 4194322, 8388629, 16777224, 33554450, 67108886, 134217729, 268435468, 536870939, 1073741850, 2147483677
Offset: 1

Views

Author

Leroy Quet, Feb 14 2007

Keywords

Crossrefs

Programs

  • Mathematica
    f[n_] := n*Ceiling[2^n/n];Array[f, 33] (* Ray Chandler, Feb 19 2007 *)
  • Python
    def A128093(n): return (m:=1<Chai Wah Wu, Aug 24 2023

Formula

a(n) = n * ceiling(2^n/n) = n * A053638(n).

Extensions

Extended by Ray Chandler, Feb 19 2007

A129787 Ceiling(3^n/n).

Original entry on oeis.org

3, 5, 9, 21, 49, 122, 313, 821, 2187, 5905, 16105, 44287, 122641, 341641, 956594, 2690421, 7596481, 21523361, 61171657, 174339221, 498112058, 1426411801, 4093181689, 11767897354, 33891544378, 97764070321, 282429536481
Offset: 1

Views

Author

Mohammad K. Azarian, May 18 2007

Keywords

Crossrefs

Cf. A053638.

Programs

A129788 a(n) = ceiling(4^n/n).

Original entry on oeis.org

4, 8, 22, 64, 205, 683, 2341, 8192, 29128, 104858, 381301, 1398102, 5162221, 19173962, 71582789, 268435456, 1010580541, 3817748708, 14467258261, 54975581389, 209430786244, 799644820201, 3059510616421, 11728124029611
Offset: 1

Views

Author

Mohammad K. Azarian, May 18 2007

Keywords

Crossrefs

Cf. A053638.

Programs

A129789 a(n) = ceiling(5^n/n).

Original entry on oeis.org

5, 13, 42, 157, 625, 2605, 11161, 48829, 217014, 976563, 4438921, 20345053, 93900241, 435965402, 2034505209, 9536743165, 44878791361, 211927625869, 1003867701481, 4768371582032, 22706531343006, 108372081409802
Offset: 1

Views

Author

Mohammad K. Azarian, May 18 2007

Keywords

Crossrefs

Cf. A053638.

Programs

A129790 a(n) = ceiling(6^n/n).

Original entry on oeis.org

6, 18, 72, 324, 1556, 7776, 39991, 209952, 1119744, 6046618, 32981551, 181398528, 1004668771, 5597440293, 31345665639, 176319369216, 995685849691, 5642219814912, 32071565263711, 182807922003149, 1044616697160851
Offset: 1

Views

Author

Mohammad K. Azarian, May 18 2007

Keywords

Crossrefs

Cf. A053638.

Programs

A129791 a(n) = ceiling(7^n/n).

Original entry on oeis.org

7, 25, 115, 601, 3362, 19609, 117649, 720601, 4483735, 28247525, 179756977, 1153440601, 7453000801, 48444505204, 316504100663, 2077058160601, 13684147881601, 90467422106137, 599941851861745, 3989613314880601
Offset: 1

Views

Author

Mohammad K. Azarian, May 18 2007

Keywords

Crossrefs

Cf. A053638.

Programs

A129792 a(n) = ceiling(8^n/n).

Original entry on oeis.org

8, 32, 171, 1024, 6554, 43691, 299594, 2097152, 14913081, 107374183, 780903145, 5726623062, 42288908761, 314146179365, 2345624805923, 17592186044416, 132458812569721, 1000799917193444, 7585009898729257
Offset: 1

Views

Author

Mohammad K. Azarian, May 18 2007

Keywords

Crossrefs

Cf. A053638.

Programs

  • Magma
    [Ceiling(8^n/n):n in [1..20]]; // Vincenzo Librandi, Oct 03 2011
  • Mathematica
    With[{nn=20},Ceiling[8^Range[nn]/Range[nn]]] (* Harvey P. Dale, Feb 19 2014 *)

A129793 a(n) = ceiling(9^n/n).

Original entry on oeis.org

9, 41, 243, 1641, 11810, 88574, 683282, 5380841, 43046721, 348678441, 2852823601, 23535794707, 195528140641, 1634056603926, 13726075472977, 115813761803241, 981010688215681, 8338590849833285, 71097458824894321
Offset: 1

Views

Author

Mohammad K. Azarian, May 18 2007

Keywords

Crossrefs

Cf. A053638.

Programs

A373895 a(n) = ceiling((2^n+n-1)/n).

Original entry on oeis.org

2, 3, 4, 5, 8, 12, 20, 33, 58, 104, 188, 343, 632, 1172, 2186, 4097, 7712, 14565, 27596, 52430, 99866, 190652, 364724, 699052, 1342179, 2581112, 4971028, 9586982, 18512792, 35791396, 69273668, 134217729, 260301050, 505290272, 981706812, 1908874355, 3714566312, 7233629132, 14096302922, 27487790696
Offset: 1

Views

Author

Eric W. Weisstein, Jun 21 2024

Keywords

Comments

a(n) is the irregularity strength of the hypercube graph Q_n for n >= 2.

Crossrefs

Programs

  • Mathematica
    Array[Ceiling[(2^# + # - 1)/#] &, 120] (* Michael De Vlieger, Jun 21 2024 *)
Previous Showing 11-20 of 20 results.