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

A342197 a(0) = 1; a(n) = Sum_{k=1..n} binomial(n,k)^3 * a(k-1).

Original entry on oeis.org

1, 1, 9, 63, 919, 18919, 505639, 18602319, 877402487, 51212704151, 3688010412503, 321523601578079, 33283248550719793, 4050897039400696253, 574469890816237292037, 93943844587040615104177, 17565329004174205621822169, 3730161837629377369026433019
Offset: 0

Views

Author

Ilya Gutkovskiy, Mar 04 2021

Keywords

Crossrefs

Programs

  • Mathematica
    a[0] = 1; a[n_] := a[n] = Sum[Binomial[n, k]^3 a[k - 1], {k, 1, n}]; Table[a[n], {n, 0, 17}]

A342198 a(0) = 1; a(n) = Sum_{k=1..n} binomial(n,k)^4 * a(k-1).

Original entry on oeis.org

1, 1, 17, 179, 6083, 298583, 20015947, 2214261035, 332014246747, 64923646898023, 17220997162396851, 5898373172881341811, 2513698997312409032785, 1335813901379210302030497, 875400777321767437156156305, 692119702624591542667897216641, 653524900495231808524498551469617
Offset: 0

Views

Author

Ilya Gutkovskiy, Mar 04 2021

Keywords

Crossrefs

Programs

  • Mathematica
    a[0] = 1; a[n_] := a[n] = Sum[Binomial[n, k]^4 a[k - 1], {k, 1, n}]; Table[a[n], {n, 0, 16}]

A342199 a(0) = 1; a(n) = Sum_{k=1..n} binomial(n,k)^5 * a(k-1).

Original entry on oeis.org

1, 1, 33, 519, 43111, 5068111, 840782023, 291086377719, 139698959369111, 90748115988081551, 90809507057803456103, 124011515918275951611959, 217278911997171247450862041, 509237348184229328050319432621, 1567286639251140454692258569881053
Offset: 0

Views

Author

Ilya Gutkovskiy, Mar 04 2021

Keywords

Crossrefs

Programs

  • Mathematica
    a[0] = 1; a[n_] := a[n] = Sum[Binomial[n, k]^5 a[k - 1], {k, 1, n}]; Table[a[n], {n, 0, 14}]
Showing 1-3 of 3 results.