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

A320347 Number of partitions of n into distinct parts (a_1, a_2, ... , a_m) (a_1 > a_2 > ... > a_m and Sum_{k=1..m} a_k = n) such that a1 - a2, a2 - a3, ..., a_{m-1} - a_m are different.

Original entry on oeis.org

1, 1, 2, 2, 3, 3, 5, 6, 6, 9, 11, 10, 15, 18, 19, 24, 31, 29, 40, 44, 51, 56, 72, 69, 90, 97, 114, 125, 154, 151, 192, 207, 237, 255, 304, 314, 377, 401, 457, 493, 573, 596, 698, 750, 845, 905, 1034, 1104, 1255, 1354, 1507, 1624, 1817, 1955, 2178, 2357, 2605, 2794, 3077, 3380
Offset: 1

Views

Author

Seiichi Manyama, Oct 11 2018

Keywords

Comments

In other words, a(n) is the number of strict integer partitions of n with distinct first differences. - Gus Wiseman, Mar 25 2021

Examples

			n = 9
[9]        ooooooooo
------------------------------------
[8, 1]      *******o  a_1 - a_2 = 7.
            oooooooo
------------------------------------
[7, 2]       *****oo  a_1 - a_2 = 5.
             ooooooo
------------------------------------
[6, 3]        ***ooo  a_1 - a_2 = 3.
              oooooo
------------------------------------
[6, 2, 1]         *o  a_2 - a_3 = 1.
              ****oo  a_1 - a_2 = 4.
              oooooo
------------------------------------
[5, 4]         *oooo  a_1 - a_2 = 1.
               ooooo
------------------------------------
a(9) = 6.

Links

Crossrefs

Cf. A000009, A320348.
The equal instead of distinct version is A049980.
The non-strict version is A325325 (ranking: A325368).
The non-strict ordered version is A325545.
The version for first quotients is A342520 (non-strict: A342514).
Cf. A003114, A003242, A005117, A238710, A342530.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&UnsameQ@@Differences[#]&]],{n,0,30}] (* Gus Wiseman, Mar 27 2021 *)

A342529 Number of compositions of n with distinct first quotients.

Original entry on oeis.org

1, 1, 2, 3, 7, 13, 19, 36, 67, 114, 197, 322, 564, 976, 1614, 2729, 4444, 7364, 12357, 20231, 33147, 53973, 87254, 140861, 227535, 368050, 589706, 940999, 1497912, 2378260, 3774297, 5964712, 9416411, 14822087, 23244440, 36420756
Offset: 0

Views

Author

Gus Wiseman, Mar 17 2021

Keywords

Comments

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 composition (2,1,2,3) has first quotients (1/2,2,3/2) so is counted under a(8).
The a(1) = 1 through a(5) = 13 compositions:
  (1)  (2)    (3)    (4)      (5)
       (1,1)  (1,2)  (1,3)    (1,4)
              (2,1)  (2,2)    (2,3)
                     (3,1)    (3,2)
                     (1,1,2)  (4,1)
                     (1,2,1)  (1,1,3)
                     (2,1,1)  (1,2,2)
                              (1,3,1)
                              (2,1,2)
                              (2,2,1)
                              (3,1,1)
                              (1,1,2,1)
                              (1,2,1,1)

Links

Crossrefs

The version for differences instead of quotients is A325545.
The version for equal first quotients is A342495.
The unordered version is A342514, ranked by A342521.
The strict unordered version is A342520.
A000005 counts constant compositions.
A000009 counts strictly increasing (or strictly decreasing) compositions.
A000041 counts weakly increasing (or weakly decreasing) compositions.
A001055 counts factorizations (strict: A045778, ordered: A074206).
A003238 counts chains of divisors summing to n - 1 (strict: A122651).
A167865 counts strict chains of divisors > 1 summing to n.
Cf. A003242, A008965, A048004, A059966, A167606, A253249, A318991, A318992, A342527, A342528.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],UnsameQ@@Divide@@@Partition[#,2,1]&]],{n,0,15}]

Extensions

a(21)-a(35) from Alois P. Heinz, Jan 16 2025

A342496 Number of integer partitions of n with constant (equal) first quotients.

Original entry on oeis.org

1, 1, 2, 3, 4, 4, 6, 6, 7, 7, 8, 7, 11, 9, 11, 12, 12, 10, 14, 12, 15, 16, 14, 13, 19, 15, 17, 17, 20, 16, 23, 19, 21, 20, 20, 22, 26, 21, 23, 25, 28, 22, 30, 24, 27, 29, 26, 25, 33, 29, 30, 29, 32, 28, 34, 31, 36, 34, 32, 31, 42
Offset: 0

Views

Author

Gus Wiseman, Mar 17 2021

Keywords

Comments

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 (12,6,3) has first quotients (1/2,1/2) so is counted under a(21).
The a(1) = 1 through a(9) = 7 partitions:
  1   2    3     4      5       6        7         8          9
      11   21    22     32      33       43        44         54
           111   31     41      42       52        53         63
                 1111   11111   51       61        62         72
                                222      421       71         81
                                111111   1111111   2222       333
                                                   11111111   111111111

Links

Crossrefs

The version for differences instead of quotients is A049988.
The ordered version is A342495.
The distinct version is A342514.
The strict case is A342515.
The Heinz numbers of these partitions are A342522.
A000005 counts constant partitions.
A003238 counts chains of divisors summing to n - 1 (strict: A122651).
A167865 counts strict chains of divisors > 1 summing to n.
Cf. A000837, A002843, A003242, A074206, A175342, A318991, A318992, A325557, A342527, A342528, A342529.

Programs

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

Formula

a(n > 0) = (A342495(n) + A000005(n))/2.

A342520 Number of strict integer partitions of n with distinct first quotients.

Original entry on oeis.org

1, 1, 1, 2, 2, 3, 4, 4, 6, 8, 10, 12, 13, 16, 20, 25, 30, 37, 42, 50, 57, 65, 80, 93, 108, 127, 147, 170, 198, 225, 258, 297, 340, 385, 448, 499, 566, 647, 737, 832, 937, 1064, 1186, 1348, 1522, 1701, 1916, 2157, 2402, 2697, 3013, 3355, 3742, 4190, 4656, 5191
Offset: 0

Views

Author

Gus Wiseman, Mar 20 2021

Keywords

Comments

Also the number of reversed strict integer partitions of n with distinct 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 strict partition (12,10,5,2,1) has first quotients (5/6,1/2,2/5,1/2) so is not counted under a(30), even though the first differences (-2,-5,-3,-1) are distinct.
The a(1) = 1 through a(13) = 16 partitions (A..D = 10..13):
  1   2   3    4    5    6     7    8     9     A      B      C     D
          21   31   32   42    43   53    54    64     65     75    76
                    41   51    52   62    63    73     74     84    85
                         321   61   71    72    82     83     93    94
                                    431   81    91     92     A2    A3
                                    521   432   532    A1     B1    B2
                                          531   541    542    543   C1
                                          621   631    632    642   643
                                                721    641    651   652
                                                4321   731    732   742
                                                       821    741   751
                                                       5321   831   832
                                                              921   841
                                                                    A21
                                                                    5431
                                                                    7321

Links

Crossrefs

The version for differences instead of quotients is A320347.
The non-strict version is A342514 (ranking: A342521).
The equal instead of distinct version is A342515.
The non-strict ordered version is A342529.
The version for strict divisor chains is A342530.
A000041 counts partitions (strict: A000009).
A001055 counts factorizations (strict: A045778, ordered: A074206).
A003238 counts chains of divisors summing to n - 1 (strict: A122651).
A167865 counts strict chains of divisors > 1 summing to n.
A342086 counts strict chains of divisors with strictly increasing quotients.
A342098 counts (strict) partitions with all adjacent parts x > 2y.
Cf. A000005, A003114, A003242, A005117, A018819, A067824, A238710, A253249, A318991, A318992.

Programs

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

A342530 Number of strict chains of divisors ending with n and having distinct first quotients.

Original entry on oeis.org

1, 2, 2, 3, 2, 6, 2, 6, 3, 6, 2, 12, 2, 6, 6, 9, 2, 12, 2, 12, 6, 6, 2, 28, 3, 6, 6, 12, 2, 26, 2, 14, 6, 6, 6, 31, 2, 6, 6, 28, 2, 26, 2, 12, 12, 6, 2, 52, 3, 12, 6, 12, 2, 28, 6, 28, 6, 6, 2, 66, 2, 6, 12, 25, 6, 26, 2, 12, 6, 26, 2, 76, 2, 6, 12, 12, 6, 26
Offset: 1

Views

Author

Gus Wiseman, Mar 25 2021

Keywords

Comments

The first quotients of a sequence are defined as if the sequence were an increasing divisor chain, so for example the quotients of (6,3,1) are (1/2,1/3).

Examples

			The a(1) = 1 through a(12) = 12 chains (reversed):
  1  2    3    4    5    6      7    8      9    10      11    12
     2/1  3/1  4/1  5/1  6/1    7/1  8/1    9/1  10/1    11/1  12/1
               4/2       6/2         8/2    9/3  10/2          12/2
                         6/3         8/4         10/5          12/3
                         6/2/1       8/2/1       10/2/1        12/4
                         6/3/1       8/4/1       10/5/1        12/6
                                                               12/2/1
                                                               12/3/1
                                                               12/4/1
                                                               12/4/2
                                                               12/6/1
                                                               12/6/2
Not counted under a(12) are: 12/4/2/1, 12/6/2/1, 12/6/3, 12/6/3/1.

Links

Crossrefs

The version for weakly increasing first quotients is A057567.
The version for equal first quotients is A169594.
The case of chains starting with 1 is A254578.
The version for strictly increasing first quotients is A342086.
A001055 counts factorizations (strict: A045778, ordered: A074206).
A067824 counts strict chains of divisors ending with n.
A167865 counts strict chains of divisors > 1 summing to n.
A253249 counts strict chains of divisors.
A334997 counts chains of divisors of n by length.
A342495/A342529 count compositions with equal/distinct quotients.
A342496/A342514 count partitions with equal/distinct quotients.
A342515/A342520 count strict partitions with equal/distinct quotients.
A342522/A342521 rank partitions with equal/distinct quotients.
Cf. A000009, A003238, A003242, A122651, A179254, A318991, A318992, A325545.

Programs

  • Mathematica
    cmi[n_]:=Prepend[Prepend[#,n]&/@Join@@cmi/@Most[Divisors[n]],{n}];
Table[Length[Select[cmi[n],UnsameQ@@Divide@@@Partition[#,2,1]&]],{n,100}]

Formula

a(n) = Sum_{d|n} A254578(d). - Ridouane Oudra, Jun 17 2025

A342521 Heinz numbers of integer partitions with distinct first quotients.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 9, 10, 11, 12, 13, 14, 15, 17, 18, 19, 20, 21, 22, 23, 25, 26, 28, 29, 30, 31, 33, 34, 35, 37, 38, 39, 41, 43, 44, 45, 46, 47, 49, 50, 51, 52, 53, 55, 57, 58, 59, 60, 61, 62, 63, 65, 66, 67, 68, 69, 70, 71, 73, 74, 75, 76, 77, 78, 79, 82
Offset: 1

Views

Author

Gus Wiseman, Mar 23 2021

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.
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 1365 are {2,3,4,6}, with first quotients (3/2,4/3,3/2), so 1365 is not in the sequence.
Most small numbers are in the sequence, but the sequence of non-terms together with their prime indices begins:
    8: {1,1,1}
   16: {1,1,1,1}
   24: {1,1,1,2}
   27: {2,2,2}
   32: {1,1,1,1,1}
   36: {1,1,2,2}
   40: {1,1,1,3}
   42: {1,2,4}
   48: {1,1,1,1,2}
   54: {1,2,2,2}
   56: {1,1,1,4}
   64: {1,1,1,1,1,1}
   72: {1,1,1,2,2}
   80: {1,1,1,1,3}
   81: {2,2,2,2}
   84: {1,1,2,4}
   88: {1,1,1,5}
   96: {1,1,1,1,1,2}
  100: {1,1,3,3}

Links

Crossrefs

For multiplicities (prime signature) instead of quotients we have A130091.
For differences instead of quotients we have A325368 (count: A325325).
These partitions are counted by A342514 (strict: A342520, ordered: A342529).
The equal instead of distinct version is A342522.
The version counting strict divisor chains is A342530.
A001055 counts factorizations (strict: A045778, ordered: A074206).
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. A003242, A005117, A056239, A067824, A098859, A112798, A169594, A253249, A325326, A325337, A325405.

Programs

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

A342531 Triangle read by rows where T(n,k) is the number of strict integer partitions of n with maximal descent k, n >= 0, 0 <= k <= n.

Original entry on oeis.org

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

Views

Author

Gus Wiseman, Mar 25 2021

Keywords

Comments

The maximal descent of an empty or singleton partition is considered to be 0.

Examples

			Triangle begins:
1
1 0
1 0 0
1 1 0 0
1 0 1 0 0
1 1 0 1 0 0
1 1 1 0 1 0 0
1 1 1 1 0 1 0 0
1 0 2 1 1 0 1 0 0
1 2 1 1 1 1 0 1 0 0
1 1 2 2 1 1 1 0 1 0 0
1 1 2 3 1 1 1 1 0 1 0 0
1 1 3 2 3 1 1 1 1 0 1 0 0
1 1 3 3 3 2 1 1 1 1 0 1 0 0
1 1 3 4 3 3 2 1 1 1 1 0 1 0 0
1 3 3 4 4 3 2 2 1 1 1 1 0 1 0 0
1 0 5 5 5 4 3 2 2 1 1 1 1 0 1 0 0
1 1 4 7 5 5 4 2 2 2 1 1 1 1 0 1 0 0
1 2 5 6 7 6 4 4 2 2 2 1 1 1 1 0 1 0 0
1 1 5 9 7 7 6 4 3 2 2 2 1 1 1 1 0 1 0 0
1 1 6 9 9 7 8 5 4 3 2 2 2 1 1 1 1 0 1 0 0
Row n = 15 counts the following strict partitions (empty columns indicated by dots, A..F = 10..15):
  F  87     753   96    762   A5   A41   B4   B31  C3  C21  D2  .  E1  .  .
     654    6432  852   843   861  9321  A32
     54321  6531  7431  951   942
                  7521  8421

Links

Crossrefs

The non-strict version is A238353.
A000041 counts partitions (strict: A000009).
A049980 counts strict partitions with equal differences.
A325325 counts partitions with distinct differences (ranking: A325368).
A325545 counts compositions with distinct differences.
Cf. A003114, A003242, A005117, A034296, A049988, A238710, A342098, A342514.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&If[Length[#]<=1,k==0,Max[Differences[Reverse[#]]]==k]&]],{n,0,15},{k,0,n}]
Showing 1-7 of 7 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.