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

A237278 Numbers k such that A000041(k) == 0 (mod 4).

Original entry on oeis.org

11, 15, 21, 26, 30, 55, 58, 59, 62, 66, 70, 74, 75, 78, 80, 84, 94, 96, 98, 100, 106, 108, 109, 112, 113, 116, 117, 120, 122, 124, 125, 126, 128, 130, 131, 133, 135, 136, 137, 141, 142, 149, 153, 154, 171, 179, 180, 187, 191, 200, 205, 206, 230, 231, 236
Offset: 1

Views

Author

Clark Kimberling, Feb 05 2014

Keywords

Comments

The set of positive integers is partitioned by the sequences A237278-A237281.

Examples

			A000041(11) = 56 == 0 (mod 4).

Links

Crossrefs

Cf. A000041, A237276, A237279, A237280, A237281, A243935 (see crossrefs).
Cf. A121062.

Programs

  • Mathematica
    f[n_, k_] := Select[Range[250], Mod[PartitionsP[#], n] == k &]
Table[f[4, k], {k, 0, 3}] (* A237278-A237281 *)
  • PARI
    is(n)=numbpart(n)%4==0 \\ Charles R Greathouse IV, Apr 08 2015

A237280 Numbers k such that A000041(k) == 2 (mod 4).

Original entry on oeis.org

2, 8, 9, 10, 19, 22, 25, 27, 28, 31, 34, 40, 42, 45, 46, 47, 50, 57, 64, 65, 79, 86, 97, 101, 103, 110, 129, 147, 151, 158, 160, 163, 167, 170, 174, 175, 176, 184, 197, 198, 207, 213, 217, 224, 227, 228, 241, 245, 246, 247
Offset: 1

Views

Author

Clark Kimberling, Feb 05 2014

Keywords

Comments

The set of positive integers is partitioned by the sequences A237278-A237281.

Examples

			A000041(8) = 22 == 2 (mod 4).

Links

Crossrefs

Cf. A000041, A237276, A237278, A237279, A237281.
Cf. A121062.

Programs

  • Mathematica
    f[n_, k_] := Select[Range[250], Mod[PartitionsP[#], n] == k &]
Table[f[4, k], {k, 0, 3}] (* A237278-A237281 *)

A237281 Numbers k such that A000041(k) == 3 (mod 4).

Original entry on oeis.org

3, 5, 6, 7, 14, 16, 20, 23, 24, 33, 35, 38, 41, 44, 51, 53, 54, 56, 60, 63, 68, 72, 76, 77, 81, 82, 91, 92, 95, 99, 102, 111, 115, 118, 121, 127, 134, 138, 139, 140, 146, 156, 159, 161, 164, 165, 166, 168, 169, 173, 177, 178, 182, 183, 188, 192, 196, 201
Offset: 1

Views

Author

Clark Kimberling, Feb 05 2014

Keywords

Comments

The set of positive integers is partitioned by the sequences A237278-A237281.

Examples

			A000041(6) = 11 == 3 (mod 4).

Links

Crossrefs

Cf. A000041, A237276, A237278, A237279, A237280.
Cf. A121062.

Programs

  • Mathematica
    f[n_, k_] := Select[Range[250], Mod[PartitionsP[#], n] == k &]
Table[f[4, k], {k, 0, 3}] (* A237278-A237281 *)

A237279 Numbers k such that A000041(k) == 1 (mod 4).

Original entry on oeis.org

1, 4, 12, 13, 17, 18, 29, 32, 36, 37, 39, 43, 48, 49, 52, 61, 67, 69, 71, 73, 83, 85, 87, 88, 89, 90, 93, 104, 105, 107, 114, 119, 123, 132, 143, 144, 145, 148, 150, 152, 155, 157, 162, 172, 181, 185, 186, 189, 190, 193, 194, 195, 199, 203, 208, 216, 219
Offset: 1

Views

Author

Clark Kimberling, Feb 05 2014

Keywords

Comments

The set of positive integers is partitioned by the sequences A237278-A237281.

Examples

			A000041(4) = 5 == 1 (mod 4).

Links

Crossrefs

Cf. A000041, A237276, A237278, A237280, A237281.
Cf. A121062.

Programs

  • Mathematica
    f[n_, k_] := Select[Range[250], Mod[PartitionsP[#], n] == k &]
Table[f[4, k], {k, 0, 3}] (* A237278-A237281 *)

A087184 Partition numbers of the form 3*k+1.

Original entry on oeis.org

1, 1, 7, 22, 385, 490, 1255, 3010, 3718, 12310, 17977, 21637, 75175, 89134, 204226, 386155, 451276, 831820, 1300156, 1741630, 5392783, 6185689, 10619863, 18004327, 20506255, 34262962, 49995925, 64112359, 104651419, 150198136
Offset: 1

Views

Author

Reinhard Zumkeller, Aug 23 2003

Keywords

Links

Crossrefs

Cf. A000041, A087181, A087183, A087185, A068907, A052001, A052003, A237276.

Programs

  • Mathematica
    Select[PartitionsP[Range[0, 100]], Mod[#, 3] == 1 &] (* Amiram Eldar, May 22 2025 *)

Formula

a(n) = A000041(A237276(n)). - Amiram Eldar, May 22 2025

A237277 Numbers k such that A000041(k) == 2 (mod 3).

Original entry on oeis.org

2, 4, 6, 11, 12, 13, 15, 25, 29, 31, 38, 42, 47, 49, 56, 58, 60, 65, 66, 67, 69, 74, 76, 78, 79, 83, 84, 85, 87, 90, 92, 93, 94, 96, 101, 103, 105, 108, 109, 114, 120, 121, 123, 126, 127, 130, 131, 132, 135, 136, 141, 144, 145, 153, 156, 159, 165, 167, 171
Offset: 1

Views

Author

Clark Kimberling, Feb 05 2014

Keywords

Comments

The set of positive integers is partitioned by A083214, A237276, and A237277.

Examples

			A000041(6) = 11 == 2 (mod 3).

Links

Crossrefs

Cf. A000041, A083214, A237276.

Programs

  • Mathematica
    f[n_, k_] := Select[Range[250], Mod[PartitionsP[#], n] == k &]
Table[f[3, k], {k, 0, 2}] (* A083214, A237276, A237277 *)
Table[f[4, k], {k, 0, 3}] (* A237278-A237281 *)
Showing 1-6 of 6 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.