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 11-14 of 14 results.

A353504 Number of integer partitions of n whose product is less than the product of their multiplicities.

Original entry on oeis.org

0, 0, 1, 1, 1, 2, 2, 4, 4, 6, 6, 8, 9, 11, 12, 14, 14, 18, 21, 23, 26, 29, 29, 33, 36, 39, 40, 43, 44, 50, 53, 55, 59, 65, 69, 72, 78, 79, 81, 85, 92, 95, 97, 100, 103, 108, 109, 112, 118, 124, 129, 137, 139, 142, 149, 155, 159, 165, 166, 173, 178, 181, 187
Offset: 0

Views

Author

Gus Wiseman, May 19 2022

Keywords

Examples

			The a(2) = 1 through a(9) = 6 partitions:
  11   111   1111   2111    21111    22111     221111     222111
                    11111   111111   31111     311111     411111
                                     211111    2111111    2211111
                                     1111111   11111111   3111111
                                                          21111111
                                                          111111111

Crossrefs

LHS (product of parts) is counted by A339095, ranked by A003963.
RHS (product of multiplicities) is counted by A266477, ranked by A005361.
The version for greater instead of less is A353505.
The version for equal instead of less is A353506, ranked by A353503.
A181819 gives prime shadow, with an inverse A181821.
A353398 counts partitions with the same product of multiplicities as of shadows, ranked by A353399.
Cf. A002033, A008284, A085629, A097318, A098859, A114640, A116608, A118914, A124010, A304678, A353394, A353500, A353507.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],Times@@#

A353505 Number of integer partitions of n whose product is greater than the product of their multiplicities.

Original entry on oeis.org

0, 0, 1, 2, 3, 5, 7, 11, 17, 24, 35, 47, 66, 89, 121, 162, 214, 276, 362, 464, 599, 763, 971, 1219, 1537, 1918, 2393, 2966, 3668, 4512, 5549, 6784, 8287, 10076, 12238, 14807, 17898, 21556, 25931, 31094, 37243, 44486, 53075, 63158, 75069, 89025, 105447, 124636
Offset: 0

Views

Author

Gus Wiseman, May 19 2022

Keywords

Examples

			The a(0) = 0 through a(7) = 11 partitions:
  .  .  (2)  (3)   (4)   (5)    (6)    (7)
             (21)  (22)  (32)   (33)   (43)
                   (31)  (41)   (42)   (52)
                         (221)  (51)   (61)
                         (311)  (222)  (322)
                                (321)  (331)
                                (411)  (421)
                                       (511)
                                       (2221)
                                       (3211)
                                       (4111)

Crossrefs

RHS (product of multiplicities) is counted by A266477, ranked by A005361.
LHS (product of parts) is counted by A339095, ranked by A003963.
The version for less instead of greater is A353504.
The version for equality is A353506, ranked by A353503.
A124010 gives prime signature, sorted A118914.
A181819 gives prime shadow, with an inverse A181821.
A353398 counts partitions with the same products of multiplicities as of shadows, ranked by A353399.
Cf. A002033, A008284, A008619, A085629, A097318, A098859, A114640, A116608, A130091, A304678, A353394, A353507.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],Times@@#>Times@@Length/@Split[#]&]],{n,0,30}]

A353699 Heinz numbers of integer partitions whose product equals their length.

Original entry on oeis.org

2, 6, 20, 36, 56, 176, 240, 416, 864, 1088, 1344, 2432, 3200, 5888, 8448, 14848, 23040, 31744, 35840, 39936, 75776, 167936, 208896, 331776, 352256, 450560, 516096, 770048, 802816, 933888, 1736704, 2457600, 3866624, 4259840, 4521984, 7995392, 12976128, 17563648
Offset: 1

Views

Author

Gus Wiseman, May 19 2022

Keywords

Comments

The Heinz number of a partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions.

Examples

			The terms together with their prime indices begin:
      2: {1}
      6: {1,2}
     20: {1,1,3}
     36: {1,1,2,2}
     56: {1,1,1,4}
    176: {1,1,1,1,5}
    240: {1,1,1,1,2,3}
    416: {1,1,1,1,1,6}
    864: {1,1,1,1,1,2,2,2}
   1088: {1,1,1,1,1,1,7}
   1344: {1,1,1,1,1,1,2,4}
   2432: {1,1,1,1,1,1,1,8}
   3200: {1,1,1,1,1,1,1,3,3}
   5888: {1,1,1,1,1,1,1,1,9}
   8448: {1,1,1,1,1,1,1,1,2,5}
  14848: {1,1,1,1,1,1,1,1,1,10}
  23040: {1,1,1,1,1,1,1,1,1,2,2,3}
  31744: {1,1,1,1,1,1,1,1,1,1,11}
  35840: {1,1,1,1,1,1,1,1,1,1,3,4}
  39936: {1,1,1,1,1,1,1,1,1,1,2,6}
  75776: {1,1,1,1,1,1,1,1,1,1,1,12}

Crossrefs

Length is A001222, counted by A008284, distinct A001221.
Product is A003963, counted by A339095, firsts A318871.
A similar sequence is A353503, counted by A353506.
These partitions are counted by A353698.
A005361 gives product of signature, firsts A353500 (sorted A085629).
A056239 adds up prime indices, row sums of A112798 and A296150.
A124010 gives prime signature, sorted A118914.
A181819 gives prime shadow, with an inverse A181821.
A353394 gives product of shadows of prime indices, firsts A353397.
Cf. A000720, A003586, A114640, A182850, A320325, A325131, A325755, A353399, A353507.

Programs

  • Mathematica
    Select[Range[1000],Times@@Cases[If[#==1,{},FactorInteger[#]],{p_,k_}:>PrimePi[p]^k]==PrimeOmega[#]&]

A353741 Irregular triangle read by rows where T(n,k) is the number of integer partitions of n with product k, all zeros removed.

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 1, 1, 2, 1, 2, 2, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 1, 2, 1, 1, 1, 2, 1, 2, 1, 3, 1, 1, 3, 1, 3, 1, 1, 1, 1, 2, 1, 2, 1, 3, 2, 1, 3, 1, 1, 3, 2, 2, 2, 1, 1, 1, 1, 2, 1, 2, 1, 3, 2, 2, 3, 1, 1, 4, 2, 2, 1, 4, 1, 1, 1, 3, 2
Offset: 0

Views

Author

Gus Wiseman, May 20 2022

Keywords

Comments

Warning: There are certain internal "holes" in A339095 that are removed in this sequence.

Examples

			Triangle begins:
  1
  1
  1 1
  1 1 1
  1 1 1 2
  1 1 1 2 1 1
  1 1 1 2 1 2 2 1
  1 1 1 2 1 2 1 2 1 1 2
  1 1 1 2 1 2 1 3 1 1 3 1 3 1
  1 1 1 2 1 2 1 3 2 1 3 1 1 3 2 2 2 1
  1 1 1 2 1 2 1 3 2 2 3 1 1 4 2 2 1 4 1 1 1 3 2
Row n = 7 counts the following partitions:
  1111111   211111   31111   4111    511   61     7   421    331   52   43
                             22111         3211       2221              322

Crossrefs

Row sums are A000041.
Row lengths are A034891.
A partial transpose is A319000.
The full version with zeros is A339095, rank statistic A003963.
A008284 counts partitions by sum, strict A116608.
A225485 counts partitions by frequency depth.
A266477 counts partitions by product of multiplicities, ranked by A005361.
Cf. A002033, A266499, A325242, A325268, A325280, A353503, A353506, A353698.

Programs

  • Mathematica
    DeleteCases[Table[Length[Select[IntegerPartitions[n],Times@@#==k&]],{n,0,10},{k,1,2^n}],0,2]
Previous Showing 11-14 of 14 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.