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

A298938 Number of ordered ways of writing n^3 as a sum of n squares of nonnegative integers.

Original entry on oeis.org

1, 1, 1, 4, 5, 686, 13942, 455988, 13617853, 454222894, 18323165948, 802161109047, 42149084452070, 2481730049781672, 157265294178424356, 10977302934685469078, 812821237985857557677, 64539935903231450294134, 5504599828399250884049308
Offset: 0

Views

Author

Ilya Gutkovskiy, Jan 29 2018

Keywords

Examples

			a(4) = 5 because we have [64, 0, 0, 0], [16, 16, 16, 16], [0, 64, 0, 0], [0, 0, 64, 0] and [0, 0, 0, 64].
		

Crossrefs

Programs

  • Mathematica
    Table[SeriesCoefficient[(1 + EllipticTheta[3, 0, x])^n/2^n, {x, 0, n^3}], {n, 0, 18}]

Formula

a(n) = [x^(n^3)] (Sum_{k>=0} x^(k^2))^n.

A298937 Number of ordered ways of writing n^2 as a sum of n positive cubes.

Original entry on oeis.org

1, 1, 0, 0, 0, 0, 0, 7, 1, 0, 0, 9240, 34650, 1716, 48477, 551915, 6726720, 89973520, 102639744, 1824625081, 9915389400, 30143458884, 278196062760, 1995766236541, 6611689457736, 64547920386450, 236756174748626, 2315743488707806
Offset: 0

Views

Author

Ilya Gutkovskiy, Jan 29 2018

Keywords

Examples

			a(7) = 7 because we have [8, 8, 8, 8, 8, 8, 1], [8, 8, 8, 8, 8, 1, 8], [8, 8, 8, 8, 1, 8, 8], [8, 8, 8, 1, 8, 8, 8], [8, 8, 1, 8, 8, 8, 8], [8, 1, 8, 8, 8, 8, 8] and [1, 8, 8, 8, 8, 8, 8].
		

Crossrefs

Programs

  • Mathematica
    Join[{1}, Table[SeriesCoefficient[Sum[x^k^3, {k, 1, Floor[n^(2/3) + 1]}]^n, {x, 0, n^2}], {n, 1, 27}]]

Formula

a(n) = [x^(n^2)] (Sum_{k>=1} x^(k^3))^n.
Showing 1-2 of 2 results.