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.

Previous Showing 31-35 of 35 results.

A360070 Numbers for which there exists an integer partition such that the parts have the same mean as the multiplicities.

Original entry on oeis.org

1, 4, 8, 9, 12, 16, 18, 20, 25, 27, 32, 36, 45, 48, 49, 50, 54, 63, 64, 72, 75, 80, 81, 90, 96, 98, 99, 100, 108, 112, 117, 121, 125, 128, 144, 147, 150, 160, 162, 169, 175, 176, 180, 192, 196, 200, 208, 216, 224, 225, 240, 242, 243, 245, 250, 252, 256, 272
Offset: 1

Views

Author

Gus Wiseman, Jan 27 2023

Keywords

Comments

Conjecture: No term > 1 is squarefree.

Examples

			A partition of 20 with the same mean as its multiplicities is (5,4,3,2,1,1,1,1,1,1), so 20 is in the sequence.

Crossrefs

Positions of positive terms in A360068, ranked by A359903.
A000041 counts partitions, strict A000009.
A058398 counts partitions by mean, see also A008284, A327482.
A088529/A088530 gives mean of prime signature (A124010).
A326567/A326568 gives mean of prime indices (A112798).
Cf. A005117, A067340, A067538, A240219, A316313, A349156, A359904, A359905, A360069.

Programs

  • Mathematica
    Select[Range[30],Select[IntegerPartitions[#],Mean[#]==Mean[Length/@Split[#]]&]!={}&]

Extensions

a(22)-a(58) from Alois P. Heinz, Jan 29 2023

A360689 Number of integer partitions of n whose distinct parts have non-integer median.

Original entry on oeis.org

0, 0, 1, 1, 4, 3, 8, 6, 13, 11, 21, 17, 34, 36, 55, 61, 97, 115, 162, 191, 270, 328, 427, 514, 666, 810, 1027, 1211, 1530, 1832, 2260, 2688, 3342, 3952, 4824, 5746, 7010, 8313, 10116, 11915, 14436, 17074, 20536, 24239, 29053, 34170, 40747, 47865, 56830, 66621
Offset: 1

Views

Author

Gus Wiseman, Feb 22 2023

Keywords

Comments

The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

Examples

			The a(1) = 0 through a(9) = 13 partitions:
  .  .  (21)  (211)  (32)    (411)    (43)      (332)      (54)
                     (41)    (2211)   (52)      (611)      (63)
                     (221)   (21111)  (61)      (22211)    (72)
                     (2111)           (322)     (41111)    (81)
                                      (2221)    (221111)   (441)
                                      (4111)    (2111111)  (522)
                                      (22111)              (3222)
                                      (211111)             (6111)
                                                           (22221)
                                                           (222111)
                                                           (411111)
                                                           (2211111)
                                                           (21111111)
For example, the partition y = (5,3,3,2,1,1) has distinct parts {1,2,3,5}, with median 5/2, so y is counted under a(15).

Crossrefs

For not just distinct parts: A307683, complement A325347, ranks A359912.
These partitions have ranks A360551.
The complement is counted by A360686, strict A359907, ranks A360550.
For multiplicities instead of distinct parts we have A360690, ranks A360554.
A000041 counts integer partitions, strict A000009.
A116608 counts partitions by number of distinct parts.
A359893 and A359901 count partitions by median, odd-length A359902.
A360457 gives median of distinct prime indices (times 2).
Cf. A000975, A027193, A090794, A240219, A349156, A360005, A360071, A360241, A360244, A360245.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],!IntegerQ[Median[Union[#]]]&]],{n,30}]

A361862 Number of integer partitions of n such that (maximum) - (minimum) = (mean).

Original entry on oeis.org

0, 0, 0, 1, 0, 1, 0, 3, 2, 2, 0, 7, 0, 3, 6, 10, 0, 13, 0, 17, 10, 5, 0, 40, 12, 6, 18, 34, 0, 62, 0, 50, 24, 8, 60, 125, 0, 9, 32, 169, 0, 165, 0, 95, 176, 11, 0, 373, 114, 198, 54, 143, 0, 384, 254, 574, 66, 14, 0, 1090, 0, 15, 748, 633, 448, 782, 0, 286
Offset: 1

Views

Author

Gus Wiseman, Apr 10 2023

Keywords

Comments

In terms of partition diagrams, these are partitions whose rectangle from the left (length times minimum) has the same size as the complement.

Examples

			The a(4) = 1 through a(12) = 7 partitions:
  (31)  .  (321)  .  (62)    (441)  (32221)  .  (93)
                     (3221)  (522)  (33211)     (642)
                     (3311)                     (4431)
                                                (5322)
                                                (322221)
                                                (332211)
                                                (333111)
The partition y = (4,4,3,1) has maximum 4 and minimum 1 and mean 3, and 4 - 1 = 3, so y is counted under a(12). The diagram of y is:
  o o o o
  o o o o
  o o o .
  o . . .
Both the rectangle from the left and the complement have size 4.

Crossrefs

Positions of zeros are 1 and A000040.
For length instead of mean we have A237832.
For minimum instead of mean we have A118096.
These partitions have ranks A362047.
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by length, A058398 by mean.
A067538 counts partitions with integer mean.
A097364 counts partitions by (maximum) - (minimum).
A243055 subtracts the least prime index from the greatest.
A326844 gives the diagram complement size of Heinz partition.
Cf. A237984, A240219, A326836, A326837, A327482, A237755, A237824, A349156, A359360, A360068, A360241, A361853.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],Max@@#-Min@@#==Mean[#]&]],{n,30}]

A361802 Irregular triangle read by rows where T(n,k) is the number of k-subsets of {-n+1,...,n} with sum 0, for k = 1,...,2n-1.

Original entry on oeis.org

1, 1, 1, 1, 1, 2, 3, 2, 1, 1, 3, 6, 7, 5, 2, 1, 1, 4, 10, 16, 18, 14, 8, 3, 1, 1, 5, 15, 31, 46, 51, 43, 27, 12, 3, 1, 1, 6, 21, 53, 98, 139, 155, 134, 88, 43, 16, 4, 1, 1, 7, 28, 83, 184, 319, 441, 486, 424, 293, 161, 68, 21, 4, 1
Offset: 1

Views

Author

Gus Wiseman, Apr 10 2023

Keywords

Comments

Also the number of k-subsets of {1,...,2n} with mean n.

Examples

			Triangle begins:
   1
   1   1   1
   1   2   3   2   1
   1   3   6   7   5   2   1
   1   4  10  16  18  14   8   3   1
   1   5  15  31  46  51  43  27  12   3   1
   1   6  21  53  98 139 155 134  88  43  16   4   1
   1   7  28  83 184 319 441 486 424 293 161  68  21   4   1
Row n = 3 counts the following subsets:
  {0}  {-1,1}  {-1,0,1}   {-2,-1,0,3}  {-2,-1,0,1,2}
       {-2,2}  {-2,0,2}   {-2,-1,1,2}
               {-2,-1,3}

Crossrefs

Row lengths are A005408.
Row sums are A212352.
A007318 counts subsets by length.
A067538 counts partitions with integer mean.
A231147 counts subsets by median.
A327475 counts subsets with integer mean, median A000975.
A327481 counts subsets by mean.
Cf. A006134, A013580, A024718, A079309, A326512, A349156, A361654, A362046.

Programs

  • Mathematica
    Table[Length[Select[Subsets[Range[-n+1,n],{k}],Total[#]==0&]],{n,6},{k,2n-1}]

A363221 Number of strict integer partitions of n such that (length) * (maximum) <= 2n.

Original entry on oeis.org

1, 1, 2, 2, 3, 4, 5, 6, 8, 9, 11, 14, 15, 19, 23, 26, 29, 37, 39, 49, 55, 62, 71, 84, 93, 108, 118, 141, 149, 188, 193, 217, 257, 279, 318, 369, 376, 441, 495, 572, 587, 692, 760, 811, 960, 1046, 1065, 1307, 1387, 1550, 1703, 1796, 2041, 2295, 2456, 2753, 3014
Offset: 1

Views

Author

Gus Wiseman, May 23 2023

Keywords

Comments

Also strict partitions such that (maximum) <= 2*(mean).
These are strict partitions whose complement (see A361851) has size <= n.

Examples

			The partition y = (4,3,1) has length 3 and maximum 4, and 3*4 <= 2*8, so y is counted under a(8). The complement of y has size 4, which is less than or equal to n = 8.

Crossrefs

The equal case for median is A361850, non-strict A361849 (ranks A361856).
The non-strict version is A361851, A361848 for median.
The equal case is A361854, non-strict A361853 (ranks A361855).
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by length, A058398 by mean.
A051293 counts subsets with integer mean.
A067538 counts partitions with integer mean.
Cf. A111907, A237984, A240219, A241061, A241086, A324521, A324562, A349156, A360068, A360241, A361394, A361852, A361906.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&Max@@#<=2*Mean[#]&]],{n,30}]
Previous Showing 31-35 of 35 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.