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.

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

A342515 Number of strict partitions of n with constant (equal) first-quotients.

Original entry on oeis.org

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

Views

Author

Gus Wiseman, Mar 19 2021

Keywords

Comments

Also the number of reversed strict partitions of n with constant (equal) first-quotients.
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(15) = 9 partitions (A..F = 10..15):
  1   2   3    4    5    6    7     8    9    A    B    C    D     E     F
          21   31   32   42   43    53   54   64   65   75   76    86    87
                    41   51   52    62   63   73   74   84   85    95    96
                              61    71   72   82   83   93   94    A4    A5
                              421        81   91   92   A2   A3    B3    B4
                                                   A1   B1   B2    C2    C3
                                                             C1    D1    D2
                                                             931   842   E1
                                                                         8421

Links

Crossrefs

The version for differences instead of quotients is A049980.
The non-strict ordered version is A342495.
The non-strict version is A342496.
The distinct instead of equal version is A342520.
A000005 counts constant partitions.
A000041 counts partitions (strict: A000009).
A001055 counts factorizations (strict: A045778, ordered: A074206).
A003238 counts chains of divisors summing to n - 1 (strict: A122651).
A154402 counts partitions with adjacent parts x = 2y.
A167865 counts strict chains of divisors > 1 summing to n.
A175342 counts compositions with equal differences.
Cf. A003242, A005117, A049988, A057567, A067824, A253249, A307824, A318991, A318992, A325328, A342086.

Programs

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

A342514 Number of integer partitions of n with distinct first quotients.

Original entry on oeis.org

1, 1, 2, 2, 4, 5, 6, 8, 11, 14, 18, 24, 28, 35, 41, 52, 64, 81, 93, 115, 137, 157, 190, 225, 268, 313, 366, 430, 502, 587, 683, 790, 913, 1055, 1217, 1393, 1605, 1830, 2098, 2384, 2722, 3101, 3524, 4005, 4524, 5137, 5812, 6570, 7434, 8360, 9416, 10602, 11881
Offset: 0

Views

Author

Gus Wiseman, Mar 17 2021

Keywords

Comments

Also the number of reversed 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 partition (4,3,3,2,1) has first quotients (3/4,1,2/3,1/2) so is counted under a(13), but it has first differences (-1,0,-1,-1) so is not counted under A325325(13).
The a(1) = 1 through a(9) = 14 partitions:
  (1)  (2)   (3)   (4)    (5)    (6)    (7)     (8)     (9)
       (11)  (21)  (22)   (32)   (33)   (43)    (44)    (54)
                   (31)   (41)   (42)   (52)    (53)    (63)
                   (211)  (221)  (51)   (61)    (62)    (72)
                          (311)  (321)  (322)   (71)    (81)
                                 (411)  (331)   (332)   (432)
                                        (511)   (422)   (441)
                                        (3211)  (431)   (522)
                                                (521)   (531)
                                                (611)   (621)
                                                (3221)  (711)
                                                        (3321)
                                                        (4311)
                                                        (5211)

Links

Crossrefs

The version for differences instead of quotients is A325325.
The ordered version is A342529.
The strict case is A342520.
The Heinz numbers of these partitions are A342521.
A000005 counts constant partitions.
A000009 counts strict partitions.
A000041 counts partitions.
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.
A342096 counts partitions with all adjacent parts x < 2y (strict: A342097).
A342098 counts partitions with all adjacent parts x > 2y.
Cf. A000837, A002843, A003242, A175342, A318991, A318992, A325557, A342527, A342528, A342529.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],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]&]
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.