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.

A361979 Expansion of 1 / Sum_{k>=0} x^(k*(2*k - 1)).

Original entry on oeis.org

1, -1, 1, -1, 1, -1, 0, 1, -2, 3, -4, 5, -5, 4, -2, -2, 7, -13, 19, -24, 27, -25, 17, -2, -20, 48, -80, 110, -132, 137, -116, 62, 30, -158, 314, -479, 622, -704, 680, -507, 150, 405, -1135, 1973, -2797, 3432, -3662, 3250, -1983, -280, 3540, -7592, 11977, -15953
Offset: 0

Views

Author

Ilya Gutkovskiy, May 25 2023

Keywords

Crossrefs

Cf. A000384, A006950, A106507, A308806, A317665, A322798, A363149, A363275.

Programs

  • Mathematica
    nmax = 53; CoefficientList[Series[1/Sum[x^(k (2 k - 1)), {k, 0, nmax}], {x, 0, nmax}], x]

A363149 Expansion of 1 / Sum_{k>=0} x^(k*(5*k - 3)/2).

Original entry on oeis.org

1, -1, 1, -1, 1, -1, 1, -2, 3, -4, 5, -6, 7, -8, 10, -13, 17, -22, 27, -33, 40, -49, 61, -77, 98, -123, 153, -189, 233, -288, 358, -448, 561, -701, 872, -1082, 1342, -1666, 2073, -2584, 3223, -4016, 4997, -6212, 7720, -9598, 11942, -14869, 18517, -23053, 28687
Offset: 0

Views

Author

Ilya Gutkovskiy, May 25 2023

Keywords

Crossrefs

Cf. A000566, A106507, A308806, A317665, A322799, A361979, A363275.

Programs

  • Mathematica
    nmax = 50; CoefficientList[Series[1/Sum[x^(k (5 k - 3)/2), {k, 0, nmax}], {x, 0, nmax}], x]

A363275 Expansion of 1 / Sum_{k>=0} x^(k*(3*k - 2)).

Original entry on oeis.org

1, -1, 1, -1, 1, -1, 1, -1, 0, 1, -2, 3, -4, 5, -6, 7, -7, 6, -4, 1, 3, -9, 16, -24, 32, -39, 44, -46, 44, -35, 18, 8, -43, 86, -135, 187, -238, 280, -304, 300, -259, 171, -28, -174, 435, -746, 1088, -1431, 1736, -1952, 2017, -1864, 1425, -641, -527, 2086, -4002
Offset: 0

Views

Author

Ilya Gutkovskiy, May 25 2023

Keywords

Crossrefs

Cf. A000567, A106507, A195848, A308806, A317665, A322800, A361979, A363149.

Programs

  • Mathematica
    nmax = 56; CoefficientList[Series[1/Sum[x^(k (3 k - 2)), {k, 0, nmax}], {x, 0, nmax}], x]
Showing 1-3 of 3 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.