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

A342513 Number of integer partitions of n with weakly decreasing first quotients.

Original entry on oeis.org

1, 1, 2, 3, 4, 5, 7, 8, 9, 12, 13, 15, 20, 21, 24, 28, 29, 33, 40, 44, 49, 57, 61, 65, 77, 84, 87, 99, 106, 115, 132, 141, 152, 167, 180, 193, 212, 228, 246, 274, 290, 309, 338, 357, 382, 412, 439, 463, 498, 536, 569, 608, 648, 693, 743, 790, 839, 903, 949
Offset: 1

Views

Author

Gus Wiseman, Mar 17 2021

Keywords

Comments

Also called log-concave-down partitions.
Also the number of reversed integer partitions of n with weakly decreasing first quotients.
The first quotients of a sequence are defined as if the sequence were an increasing divisor chain, so for example the first quotients of (6,3,1) are (1/2,1/3).

Examples

			The partition (9,7,4,2,1) has first quotients (7/9,4/7,1/2,1/2) so is counted under a(23).
The a(1) = 1 through a(8) = 9 partitions:
  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
       (11)  (21)   (22)    (32)     (33)      (43)       (44)
             (111)  (31)    (41)     (42)      (52)       (53)
                    (1111)  (221)    (51)      (61)       (62)
                            (11111)  (222)     (331)      (71)
                                     (321)     (421)      (332)
                                     (111111)  (2221)     (431)
                                               (1111111)  (2222)
                                                          (11111111)

Links

Crossrefs

The ordered version is A069916.
The version for differences instead of quotients is A320466.
The weakly increasing version is A342497.
The strictly decreasing version is A342499.
The strict case is A342519.
The Heinz numbers of these partitions are A342526.
A000005 counts constant partitions.
A000009 counts strict partitions.
A000041 counts partitions.
A000929 counts partitions with all adjacent parts x >= 2y.
A001055 counts factorizations.
A003238 counts chains of divisors summing to n - 1 (strict: A122651).
A074206 counts ordered factorizations.
A167865 counts strict chains of divisors > 1 summing to n.
A342094 counts partitions with adjacent parts x <= 2y.
Cf. A000837, A002843, A003242, A175342, A318991, A318992, A325557, A342527, A342528, A342529.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],GreaterEqual@@Divide@@@Reverse/@Partition[#,2,1]&]],{n,0,30}]

A342526 Heinz numbers of integer partitions with weakly decreasing first quotients.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 14, 15, 16, 17, 18, 19, 21, 22, 23, 25, 26, 27, 29, 30, 31, 32, 33, 34, 35, 37, 38, 39, 41, 42, 43, 46, 47, 49, 50, 51, 53, 54, 55, 57, 58, 59, 61, 62, 64, 65, 67, 69, 70, 71, 73, 74, 75, 77, 79, 81, 82, 83, 85, 86, 87
Offset: 1

Views

Author

Gus Wiseman, Mar 23 2021

Keywords

Comments

Also called log-concave-down partitions.
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.
The first quotients of a sequence are defined as if the sequence were an increasing divisor chain, so for example the first quotients of (6,3,1) are (1/2,1/3).

Examples

			The prime indices of 294 are {1,2,4,4}, with first quotients (2,2,1), so 294 is in the sequence.
Most small numbers are in the sequence, but the sequence of non-terms together with their prime indices begins:
   12: {1,1,2}
   20: {1,1,3}
   24: {1,1,1,2}
   28: {1,1,4}
   36: {1,1,2,2}
   40: {1,1,1,3}
   44: {1,1,5}
   45: {2,2,3}
   48: {1,1,1,1,2}
   52: {1,1,6}
   56: {1,1,1,4}
   60: {1,1,2,3}
   63: {2,2,4}
   66: {1,2,5}
   68: {1,1,7}
   72: {1,1,1,2,2}
   76: {1,1,8}
   78: {1,2,6}
   80: {1,1,1,1,3}
   84: {1,1,2,4}

Links

Crossrefs

The version counting strict divisor chains is A057567.
For multiplicities (prime signature) instead of quotients we have A242031.
For differences instead of quotients we have A325361 (count: A320466).
These partitions are counted by A342513 (strict: A342519, ordered: A069916).
The weakly increasing version is A342523.
The strictly decreasing version is A342525.
A000929 counts partitions with all adjacent parts x >= 2y.
A001055 counts factorizations (strict: A045778, ordered: A074206).
A002843 counts compositions with all adjacent parts x <= 2y.
A003238 counts chains of divisors summing to n - 1 (strict: A122651).
A167865 counts strict chains of divisors > 1 summing to n.
A318991/A318992 rank reversed partitions with/without integer quotients.
Cf. A048767, A056239, A067824, A112798, A238710, A253249, A325351, A325352, A325405, A334997, A342086, A342191.

Programs

  • Mathematica
    primeptn[n_]:=If[n==1,{},Reverse[Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]]];
Select[Range[100],GreaterEqual@@Divide@@@Reverse/@Partition[primeptn[#],2,1]&]

A049286 Triangle of partitions v(d,c) defined in A002572.

Original entry on oeis.org

1, 1, 1, 2, 1, 1, 3, 2, 1, 1, 5, 4, 2, 1, 1, 9, 7, 4, 2, 1, 1, 16, 12, 7, 4, 2, 1, 1, 28, 22, 13, 7, 4, 2, 1, 1, 50, 39, 24, 13, 7, 4, 2, 1, 1, 89, 70, 42, 24, 13, 7, 4, 2, 1, 1, 159, 126, 76, 43, 24, 13, 7, 4, 2, 1, 1, 285, 225, 137, 78, 43, 24, 13, 7, 4, 2, 1, 1, 510
Offset: 1

Views

Author

N. J. A. Sloane, Michael Somos

Keywords

Comments

Rows are the columns in the table at the end of the Minc reference, read top to bottom. - Joerg Arndt, Jan 15 2024

Examples

			Triangle begins
    1,
    1,   1,
    2,   1,   1,
    3,   2,   1,  1,
    5,   4,   2,  1,  1,
    9,   7,   4,  2,  1,  1,
   16,  12,   7,  4,  2,  1,  1,
   28,  22,  13,  7,  4,  2,  1, 1,
   50,  39,  24, 13,  7,  4,  2, 1, 1,
   89,  70,  42, 24, 13,  7,  4, 2, 1, 1,
  159, 126,  76, 43, 24, 13,  7, 4, 2, 1, 1,
  285, 225, 137, 78, 43, 24, 13, 7, 4, 2, 1, 1,
  ...
Rows read backward approach A002843. - _Joerg Arndt_, Jan 15 2024

Links

Crossrefs

Cf. A002572, A002573, A002574, A049284, A049285.
See A047913 for another version.

Programs

  • Maple
    v := proc(c,d) option remember; local i; if d < 0 or c < 0 then 0 elif d = c then 1 else add(v(i,d-c),i=1..2*c); fi; end;
  • Mathematica
    v[c_, d_] := v[c, d] = If[d < 0 || c < 0, 0, If[d == c, 1, Sum[v[i, d - c], {i, 1, 2*c}]]]; Table[v[d, c], {c, 1, 13}, {d, 1, c}] // Flatten (* Jean-François Alcover, Dec 10 2012, after Maple *)

A342194 Number of strict compositions of n with equal differences, or strict arithmetic progressions summing to n.

Original entry on oeis.org

1, 1, 1, 3, 3, 5, 7, 7, 7, 13, 11, 11, 17, 13, 15, 25, 17, 17, 29, 19, 23, 35, 25, 23, 39, 29, 29, 45, 33, 29, 55, 31, 35, 55, 39, 43, 65, 37, 43, 65, 51, 41, 77, 43, 51, 85, 53, 47, 85, 53, 65, 87, 61, 53, 99, 67, 67, 97, 67, 59, 119, 61, 71, 113, 75, 79, 123, 67, 79, 117
Offset: 0

Views

Author

Gus Wiseman, Apr 02 2021

Keywords

Examples

			The a(1) = 1 through a(9) = 13 compositions:
  (1)  (2)  (3)    (4)    (5)    (6)      (7)    (8)    (9)
            (1,2)  (1,3)  (1,4)  (1,5)    (1,6)  (1,7)  (1,8)
            (2,1)  (3,1)  (2,3)  (2,4)    (2,5)  (2,6)  (2,7)
                          (3,2)  (4,2)    (3,4)  (3,5)  (3,6)
                          (4,1)  (5,1)    (4,3)  (5,3)  (4,5)
                                 (1,2,3)  (5,2)  (6,2)  (5,4)
                                 (3,2,1)  (6,1)  (7,1)  (6,3)
                                                        (7,2)
                                                        (8,1)
                                                        (1,3,5)
                                                        (2,3,4)
                                                        (4,3,2)
                                                        (5,3,1)

Links

Crossrefs

Strict compositions in general are counted by A032020.
The unordered version is A049980.
The non-strict version is A175342.
A000203 adds up divisors.
A000726 counts partitions with alternating parts unequal.
A003242 counts anti-run compositions.
A224958 counts compositions with alternating parts unequal.
A342343 counts compositions with alternating parts strictly decreasing.
A342495 counts compositions with constant quotients.
A342527 counts compositions with alternating parts equal.
Cf. A000009, A001522, A002843, A049988, A062968, A070211, A114921, A325545, A325557, A342496, A342515, A342522.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations/@Select[IntegerPartitions[n],UnsameQ@@#&],SameQ@@Differences[#]&]],{n,0,30}]

Formula

a(n > 0) = A175342(n) - A000005(n) + 1.
a(n > 0) = 2*A049988(n) - 2*A000005(n) + 1 = 2*A049982(n) + 1.
Previous Showing 31-34 of 34 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.