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

A024037 a(n) = 4^n - n.

Original entry on oeis.org

1, 3, 14, 61, 252, 1019, 4090, 16377, 65528, 262135, 1048566, 4194293, 16777204, 67108851, 268435442, 1073741809, 4294967280, 17179869167, 68719476718, 274877906925, 1099511627756, 4398046511083, 17592186044394, 70368744177641, 281474976710632, 1125899906842599
Offset: 0

Views

Author

N. J. A. Sloane

Keywords

Links

Crossrefs

Cf. numbers of the form k^n - n: A000325 (k=2), A024024 (k=3), this sequence (k=4), A024050 (k=5), A024063 (k=6), A024076 (k=7), A024089 (k=8), A024102 (k=9), A024115 (k=10), A024128 (k=11), A024141 (k=12).
Cf. A140660 (first differences).

Programs

  • Magma
    [4^n - n: n in [0..35]]; // Vincenzo Librandi, May 13 2011
  • Magma
    I:=[1, 3, 14]; [n le 3 select I[n] else 6*Self(n-1)-9*Self(n-2)+4*Self(n-3): n in [1..30]]; // Vincenzo Librandi, Jun 16 2013
  • Mathematica
    Table[4^n - n, {n, 0, 30}] (* or *) CoefficientList[Series[(1 - 3 x + 5 x^2) / ((1 - 4 x) (1 - x)^2), {x, 0, 30}], x] (* Vincenzo Librandi, Jun 16 2013 *)
  • PARI
    a(n)=4^n-n \\ Charles R Greathouse IV, Sep 24 2015

Formula

From Vincenzo Librandi, Jun 16 2013: (Start)
G.f.: (1 - 3*x + 5*x^2)/((1 - 4*x)*(1 - x)^2).
a(n) = 6*a(n-1) - 9*a(n-2) + 4*a(n-3). (End)
E.g.f.: exp(x)*(exp(3*x) - x). - Elmo R. Oliveira, Sep 10 2024

A024050 a(n) = 5^n - n.

Original entry on oeis.org

1, 4, 23, 122, 621, 3120, 15619, 78118, 390617, 1953116, 9765615, 48828114, 244140613, 1220703112, 6103515611, 30517578110, 152587890609, 762939453108, 3814697265607, 19073486328106, 95367431640605, 476837158203104, 2384185791015603, 11920928955078102, 59604644775390601
Offset: 0

Views

Author

N. J. A. Sloane

Keywords

Links

Crossrefs

Cf. numbers of the form k^n - n: A000325 (k=2), A024024 (k=3), A024037 (k=4), this sequence (k=5), A024063 (k=6), A024076 (k=7), A024089 (k=8), A024102 (k=9), A024115 (k=10), A024128 (k=11), A024141 (k=12).

Programs

  • Magma
    [5^n-n: n in [0..35]]; // Vincenzo Librandi, Jun 12 2011
  • Maple
    g:=1/(1-5*z): gser:=series(g, z=0, 43): seq(coeff(gser, z, n)-n, n=0..31); # Zerinvary Lajos, Jan 09 2009
  • Mathematica
    Table[5^n - n, {n, 0, 30}] (* or *) CoefficientList[Series[(1 - 3 x + 6 x^2) / ((1 - 5 x) (1 - x)^2), {x, 0, 30}], x] (* Vincenzo Librandi, Jun 16 2013 *)
LinearRecurrence[{7,-11,5},{1,4,23},30] (* Harvey P. Dale, Mar 03 2022 *)

Formula

a(n) = 7*a(n-1) - 11*a(n-2) + 5*a(n-3).
G.f.: (1 - 3*x + 6*x^2)/((1-5*x)*(1-x)^2). - Vincenzo Librandi, Jun 16 2013
E.g.f.: exp(x)*(exp(4*x) - x). - Elmo R. Oliveira, Sep 10 2024

A024115 a(n) = 10^n - n.

Original entry on oeis.org

1, 9, 98, 997, 9996, 99995, 999994, 9999993, 99999992, 999999991, 9999999990, 99999999989, 999999999988, 9999999999987, 99999999999986, 999999999999985, 9999999999999984, 99999999999999983, 999999999999999982, 9999999999999999981, 99999999999999999980, 999999999999999999979
Offset: 0

Views

Author

N. J. A. Sloane

Keywords

Links

Crossrefs

Cf. numbers of the form k^n-n: A000325 (k=2), A024024 (k=3), A024037 (k=4), A024050 (k=5), A024063 (k=6), A024076 (k=7), A024089 (k=8), A024102 (k=9), this sequence (k=10), A024128 (k=11), A024141 (k=12).

Programs

  • Magma
    [10^n-n: n in [0..20]]; // Vincenzo Librandi, Jun 30 2011
  • Magma
    I:=[1, 9, 98]; [n le 3 select I[n] else 12*Self(n-1)-21*Self(n-2)+10*Self(n-3): n in [1..30]]; // Vincenzo Librandi, Jun 17 2013
  • Mathematica
    Table[10^n - n, {n, 0, 20}] (* or *) CoefficientList[Series[(1 - 3 x + 11 x^2) / ((1 - 10 x) (1 - x)^2),{x, 0, 30}], x] (* Vincenzo Librandi, Jun 17 2013 *)
LinearRecurrence[{12,-21,10},{1,9,98},20] (* Harvey P. Dale, Jul 18 2020 *)
  • PARI
    a(n)=10^n-n \\ Charles R Greathouse IV, Oct 07 2015

Formula

From Vincenzo Librandi, Jun 17 2013: (Start)
G.f.: (1-3*x+11*x^2)/((1-10*x)*(1-x)^2).
a(n) = 12*a(n-1) - 21*a(n-2) + 10*a(n-3) for n > 2. (End)
E.g.f.: exp(x)*(exp(9*x) - x). - Elmo R. Oliveira, Sep 06 2024

A024063 a(n) = 6^n - n.

Original entry on oeis.org

1, 5, 34, 213, 1292, 7771, 46650, 279929, 1679608, 10077687, 60466166, 362797045, 2176782324, 13060694003, 78364164082, 470184984561, 2821109907440, 16926659444719, 101559956668398, 609359740010477, 3656158440062956, 21936950640377835, 131621703842267114, 789730223053602793
Offset: 0

Views

Author

N. J. A. Sloane

Keywords

Links

Crossrefs

Cf. numbers of the form k^n - n: A000325 (k=2), A024024 (k=3), A024037 (k=4), A024050 (k=5), this sequence (k=6), A024076 (k=7), A024089 (k=8), A024102 (k=9), A024115 (k=10), A024128 (k=11), A024141 (k=12).

Programs

  • Magma
    [6^n-n: n in [0..25]]; // Vincenzo Librandi, Jul 03 2011
  • Magma
    I:=[1, 5, 34]; [n le 3 select I[n] else 8*Self(n-1)-13*Self(n-2)+6*Self(n-3): n in [1..30]]; // Vincenzo Librandi, Jun 16 2013
  • Mathematica
    Table[6^n - n, {n, 0, 30}] (* or *) CoefficientList[Series[(1 - 3 x + 7 x^2) / ((1 - 6 x) (1 - x)^2), {x, 0, 30}], x] (* Vincenzo Librandi, Jun 16 2013 *)
  • PARI
    a(n)=6^n-n \\ Charles R Greathouse IV, Oct 07 2015

Formula

From Vincenzo Librandi, Jun 16 2013: (Start)
G.f.: (1-3*x+7*x^2)/((1-6*x)*(1-x)^2).
a(n) = 8*a(n-1) - 13*a(n-2) + 6*a(n-3). (End)
E.g.f.: exp(x)*(exp(5*x) - x). - Elmo R. Oliveira, Sep 10 2024

A024076 a(n) = 7^n - n.

Original entry on oeis.org

1, 6, 47, 340, 2397, 16802, 117643, 823536, 5764793, 40353598, 282475239, 1977326732, 13841287189, 96889010394, 678223072835, 4747561509928, 33232930569585, 232630513987190, 1628413597910431, 11398895185373124, 79792266297611981, 558545864083283986, 3909821048582988027
Offset: 0

Views

Author

N. J. A. Sloane

Keywords

Links

Crossrefs

Cf. numbers of the form k^n - n: A000325 (k=2), A024024 (k=3), A024037 (k=4), A024050 (k=5), A024063 (k=6), this sequence (k=7), A024089 (k=8), A024102 (k=9), A024115 (k=10), A024128 (k=11), A024141 (k=12).
Cf. A198688 (first differences).

Programs

Formula

From Vincenzo Librandi, Jun 16 2013: (Start)
G.f.: (1-3*x+8*x^2)/((1-7*x)*(1-x)^2).
a(n) = 9*a(n-1) - 15*a(n-2) + 7*a(n-3). (End)
E.g.f.: exp(x)*(exp(6*x) - x). - Elmo R. Oliveira, Sep 10 2024

A024089 a(n) = 8^n - n.

Original entry on oeis.org

1, 7, 62, 509, 4092, 32763, 262138, 2097145, 16777208, 134217719, 1073741814, 8589934581, 68719476724, 549755813875, 4398046511090, 35184372088817, 281474976710640, 2251799813685231, 18014398509481966, 144115188075855853, 1152921504606846956, 9223372036854775787
Offset: 0

Views

Author

N. J. A. Sloane

Keywords

Links

Crossrefs

Cf. numbers of the form k^n - n: A000325 (k=2), A024024 (k=3), A024037 (k=4), A024050 (k=5), A024063 (k=6), A024076 (k=7), this sequence (k=8), A024102 (k=9), A024115 (k=10), A024128 (k=11), A024141 (k=12).
Cf. A198855 (first differences).

Programs

  • Magma
    [8^n-n: n in [0..20]]; // Vincenzo Librandi, Jul 05 2011
  • Magma
    I:=[1,7,62]; [n le 3 select I[n] else 10*Self(n-1)-17*Self(n-2)+8*Self(n-3): n in [1..30]]; // Vincenzo Librandi, Jun 17 2013
  • Mathematica
    Table[8^n - n, {n, 0, 20}] (* or *) CoefficientList[Series[(1 - 3 x + 9 x^2) / ((1 - 8 x) (1 - x)^2), {x, 0, 30}], x] (* Vincenzo Librandi, Jun 17 2013 *)
LinearRecurrence[{10,-17,8},{1,7,62},30] (* Harvey P. Dale, Sep 28 2017 *)
  • PARI
    a(n)=8^n-n \\ Charles R Greathouse IV, Oct 07 2015

Formula

From Vincenzo Librandi, Jun 17 2013: (Start)
G.f.: (1-3*x+9*x^2)/((1-8*x)*(1-x)^2).
a(n) = 10*a(n-1) - 17*a(n-2) + 8*a(n-3). (End)
E.g.f.: exp(x)*(exp(7*x) - x). - Elmo R. Oliveira, Sep 10 2024

A024102 a(n) = 9^n - n.

Original entry on oeis.org

1, 8, 79, 726, 6557, 59044, 531435, 4782962, 43046713, 387420480, 3486784391, 31381059598, 282429536469, 2541865828316, 22876792454947, 205891132094634, 1853020188851825, 16677181699666552, 150094635296999103, 1350851717672992070, 12157665459056928781, 109418989131512359188
Offset: 0

Views

Author

N. J. A. Sloane

Keywords

Links

Crossrefs

Cf. numbers of the form k^n - n: A000325 (k=2), A024024 (k=3), A024037 (k=4), A024050 (k=5), A024063 (k=6), A024076 (k=7), A024089 (k=8), this sequence (k=9), A024115 (k=10), A024128 (k=11), A024141 (k=12).
Cf. A198966 (first differences).

Programs

  • Magma
    [9^n-n: n in [0..25]]; // Vincenzo Librandi, Jul 06 2011
  • Magma
    I:=[1, 8, 79]; [n le 3 select I[n] else 11*Self(n-1)-19*Self(n-2)+9*Self(n-3): n in [1..30]]; // Vincenzo Librandi, Jun 17 2013
  • Mathematica
    Table[9^n - n, {n, 0, 20}] (* or *) CoefficientList[Series[(1 - 3 x + 10 x^2) / ((1 - 9 x) (1 - x)^2), {x, 0, 30}], x] (* Vincenzo Librandi, Jun 17 2013 *)
LinearRecurrence[{11,-19,9},{1,8,79},30] (* Harvey P. Dale, Dec 25 2024 *)
  • PARI
    a(n)=9^n-n \\ Charles R Greathouse IV, Oct 07 2015

Formula

From Vincenzo Librandi, Jun 17 2013: (Start)
G.f.: (1-3*x+10*x^2)/((1-9*x)(1-x)^2).
a(n) = 11*a(n-1) - 19*a(n-2) + 9*a(n-3). (End)
E.g.f.: exp(x)*(exp(8*x) - x). - Elmo R. Oliveira, Sep 09 2024

A024128 a(n) = 11^n - n.

Original entry on oeis.org

1, 10, 119, 1328, 14637, 161046, 1771555, 19487164, 214358873, 2357947682, 25937424591, 285311670600, 3138428376709, 34522712143918, 379749833583227, 4177248169415636, 45949729863572145, 505447028499293754, 5559917313492231463, 61159090448414546272, 672749994932560009181
Offset: 0

Views

Author

N. J. A. Sloane

Keywords

Comments

Smallest prime of this form is a(18) = 5559917313492231463. - Bruno Berselli, Jun 17 2013

Links

Crossrefs

Cf. numbers of the form k^n - n: A000325 (k=2), A024024 (k=3), A024037 (k=4), A024050 (k=5), A024063 (k=6), A024076 (k=7), A024089 (k=8), A024102 (k=9), A024115 (k=10), this sequence (k=11), A024141 (k=12).
Cf. A199030 (first differences).

Programs

  • Magma
    [11^n-n: n in [0..20]]; // Vincenzo Librandi, Jul 01 2011
  • Magma
    I:=[1, 10, 119]; [n le 3 select I[n] else 13*Self(n-1)-23*Self(n-2)+11*Self(n-3): n in [1..30]]; // Vincenzo Librandi, Jun 17 2013
  • Mathematica
    Table[11^n - n, {n, 0, 20}] (* or *) CoefficientList[Series[(1 - 3 x + 12 x^2) / ((1 - 11 x) (1 - x)^2), {x, 0, 30}], x] (* Vincenzo Librandi, Jun 17 2013 *)
LinearRecurrence[{13,-23,11},{1,10,119},20] (* Harvey P. Dale, Aug 02 2017 *)
  • PARI
    a(n)=11^n-n \\ Charles R Greathouse IV, Jul 01 2011

Formula

From Vincenzo Librandi, Jun 17 2013: (Start)
G.f.: (1-3*x+12*x^2)/((1-11*x) (1-x)^2).
a(n) = 13*a(n-1) - 23*a(n-2) + 11*a(n-3). (End)
E.g.f.: exp(x)*(exp(10*x) - x). - Elmo R. Oliveira, Sep 10 2024
Showing 1-8 of 8 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.