A342086 -id:A342086 - cp's OEIS frontend

A342083 Number of chains of strictly inferior divisors from n to 1.

1, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 3, 2, 2, 1, 4, 1, 2, 2, 3, 1, 4, 1, 3, 2, 2, 2, 4, 1, 2, 2, 4, 1, 5, 1, 3, 3, 2, 1, 6, 1, 3, 2, 3, 1, 5, 2, 4, 2, 2, 1, 7, 1, 2, 3, 3, 2, 5, 1, 3, 2, 4, 1, 8, 1, 2, 3, 3, 2, 5, 1, 6, 2, 2, 1, 7, 2, 2, 2

Offset: 1

Gus Wiseman, Feb 28 2021

nonn

We define a divisor d|n to be strictly inferior if d < n/d. Strictly inferior divisors are counted by A056924 and listed by A341674.
These chains have first-quotients (in analogy with first-differences) that are term-wise > their decapitation (maximum element removed). Equivalently, x > y^2 for all adjacent x, y. For example, the divisor chain q = 60/6/2/1 has first-quotients (10,3,2), which are > (6,2,1), so q is counted under a(60).
Also the number of factorizations of n where each factor is greater than the product of all previous factors.

			The a(n) chains for n = 2, 6, 12, 24, 42, 48, 60, 72:
  2/1  6/1    12/1    24/1    42/1      48/1      60/1      72/1
       6/2/1  12/2/1  24/2/1  42/2/1    48/2/1    60/2/1    72/2/1
              12/3/1  24/3/1  42/3/1    48/3/1    60/3/1    72/3/1
                      24/4/1  42/6/1    48/4/1    60/4/1    72/4/1
                              42/6/2/1  48/6/1    60/5/1    72/6/1
                                        48/6/2/1  60/6/1    72/8/1
                                                  60/6/2/1  72/6/2/1
                                                            72/8/2/1
The a(n) factorizations for n = 2, 6, 12, 24, 42, 48, 60, 72:
  2  6    12   24    42     48     60      72
     2*3  2*6  3*8   6*7    6*8    2*30    8*9
          3*4  4*6   2*21   2*24   3*20    2*36
               2*12  3*14   3*16   4*15    3*24
                     2*3*7  4*12   5*12    4*18
                            2*3*8  6*10    6*12
                                   2*3*10  2*4*9
                                           2*3*12

Amiram Eldar, Table of n, a(n) for n = 1..10000

The restriction to powers of 2 is A040039.
Not requiring strict inferiority gives A074206 (ordered factorizations).
The weakly inferior version is A337135.
The strictly superior version is A342084.
The weakly superior version is A342085.
The additive version is A342098, or A000929 allowing equality.
A000005 counts divisors.
A001055 counts factorizations.
A003238 counts chains of divisors summing to n-1, with strict case A122651.
A038548 counts inferior (or superior) divisors.
A056924 counts strictly inferior (or strictly superior) divisors.
A067824 counts strict chains of divisors starting with n.
A167865 counts strict chains of divisors > 1 summing to n.
A207375 lists central divisors.
A253249 counts strict chains of divisors.
A334996 counts ordered factorizations by product and length.
A334997 counts chains of divisors of n by length.
A342086 counts chains of divisors with strictly increasing quotients > 1.
- Inferior: A033676, A066839, A072499, A161906.
- Superior: A033677, A070038, A161908.
- Strictly Inferior: A060775, A070039, A333806, A341674.
- Strictly Superior: A048098, A064052, A140271, A238535, A341673.
Cf. A000203, A001248, A002033, A006530, A018819, A020639, A045690, A337105, A342087, A342094, A342095, A342096, A342097.

cen[n_]:=If[n==1,{{1}},Prepend[#,n]&/@Join@@cen/@Select[Divisors[n],#

G.f.: x + Sum_{k>=1} a(k) * x^(k*(k + 1)) / (1 - x^k). - Ilya Gutkovskiy, Nov 03 2021

A169594 Number of divisors of n, counting divisor multiplicity in n.

Original entry on oeis.org

1, 2, 2, 4, 2, 4, 2, 6, 4, 4, 2, 7, 2, 4, 4, 9, 2, 7, 2, 7, 4, 4, 2, 10, 4, 4, 6, 7, 2, 8, 2, 11, 4, 4, 4, 12, 2, 4, 4, 10, 2, 8, 2, 7, 7, 4, 2, 14, 4, 7, 4, 7, 2, 10, 4, 10, 4, 4, 2, 13, 2, 4, 7, 15, 4, 8, 2, 7, 4, 8, 2, 16, 2, 4, 7, 7, 4, 8, 2, 14, 9, 4, 2, 13, 4, 4, 4, 10, 2, 13, 4, 7, 4, 4, 4, 17, 2, 7

Offset: 1

Joseph L. Pe, Dec 02 2009

The multiplicity of a divisor d > 1 in n is defined as the largest power i for which d^i divides n; and for d = 1 it is defined as 1.
a(n) is also the sum of the multiplicities of the divisors of n.
In other words, a(n) = 1 + sum of the highest exponents e_i for which each number k_i in range 2 .. n divide n, as {k_i}^{e_i} | n. For nondivisors of n this exponent e_i is 0, for n itself it is 1. - Antti Karttunen, May 20 2017
From Gus Wiseman, Mar 25 2021: (Start)
Also the number of strict chains of divisors ending with n and having constant (equal) first quotients. The case starting with 1 is A089723. For example, the a(1) = 1 through a(12) = 7 chains are:
  1  2    3    4      5    6    7    8        9      10    11    12
     1|2  1|3  1|4    1|5  1|6  1|7  1|8      1|9    1|10  1|11  1|12
               2|4         2|6       2|8      3|9    2|10        2|12
               1|2|4       3|6       4|8      1|3|9  5|10        3|12
                                     2|4|8                       4|12
                                     1|2|4|8                     6|12
                                                                 3|6|12
(End)
a(n) depends only on the prime signature of n. - David A. Corneth, Mar 28 2021

			The divisors of 8 are 1, 2, 4, 8 of multiplicity 1, 3, 1, 1, respectively. So a(8) = 1 + 3 + 1 + 1 = 6.

Antti Karttunen, Table of n, a(n) for n = 1..10000

Cf. A168512.
Row sums of A286561, A286563 and A286564.
A001055 counts factorizations (strict: A045778, ordered: A074206).
A057567 counts chains of divisors with weakly increasing first quotients.
A067824 counts strict chains of divisors ending with n.
A253249 counts strict chains of divisors.
A334997 counts chains of divisors of n by length.
A342086 counts chains of divisors with strictly increasing first quotients.
A342496 counts partitions with equal first quotients (strict: A342515, ranking: A342522, ordered: A342495).
A342530 counts chains of divisors with distinct first quotients.
Cf. A003238, A003242, A069916, A122651, A309891, A318991, A318992, A325545.
First differences of A078651.

a := n -> ifelse(n < 2, 1, 1 + add(padic:-ordp(n, k), k = 2..n)):
seq(a(n), n = 1..98);  # Peter Luschny, Apr 10 2025

divmult[d_, n_] := Module[{output, i}, If[d == 1, output = 1, If[d == n, output = 1, i = 0; While[Mod[n, d^(i + 1)] == 0, i = i + 1]; output = i]]; output]; dmt0[n_] := Module[{divs, l}, divs = Divisors[n]; l = Length[divs]; Sum[divmult[divs[[i]], n], {i, 1, l}]]; Table[dmt0[i], {i, 1, 40}]
Table[1 + DivisorSum[n, IntegerExponent[n, #] &, # > 1 &], {n, 98}] (* Michael De Vlieger, May 20 2017 *)

A286561(n,k) = { my(i=1); if(1==k, 1, while(!(n%(k^i)), i = i+1); (i-1)); };
A169594(n) = sumdiv(n,d,A286561(n,d)); \\ Antti Karttunen, May 20 2017

a(n) = { if(n == 1, return(1)); my(f = factor(n), u = vecmax(f[, 2]), cf = f, res = numdiv(f) - u + 1); for(i = 2, u, cf[, 2] = f[, 2]\i; res+=numdiv(factorback(cf)) ); res } \\ David A. Corneth, Mar 29 2021

A169594(n) = {my(s=0, k=2); while(k<=n, s+=valuation(n, k); k=k+1); s + 1} \\ Zhuorui He, Aug 28 2025

def a286561(n, k):
    i=1
    if k==1: return 1
    while n%(k**i)==0:
        i+=1
    return i-1
def a(n): return sum([a286561(n, d) for d in divisors(n)]) # Indranil Ghosh, May 20 2017

(define (A169594 n) (add (lambda (k) (A286561bi n k)) 1 n))
;; Implements sum_{i=lowlim..uplim} intfun(i)
(define (add intfun lowlim uplim) (let sumloop ((i lowlim) (res 0)) (cond ((> i uplim) res) (else (sumloop (1+ i) (+ res (intfun i)))))))
;; For A286561bi see A286561. - Antti Karttunen, May 20 2017

From Friedjof Tellkamp, Feb 29 2024: (Start)
a(n) = A309891(n) + 1.
G.f.: x/(1-x) + Sum_{k>=2, j>=1} x^(k^j)/(1-x^(k^j)).
Dirichlet g.f.: zeta(s) * (1 + Sum_{k>=1} (zeta(k*s) - 1)).
Sum_{n>=1} a(n)/n^2 = (7/24) * Pi^2. (End)

Extended by Ray Chandler, Dec 08 2009

A337135 a(1) = 1; for n > 1, a(n) = Sum_{d|n, d <= sqrt(n)} a(d).

Original entry on oeis.org

1, 1, 1, 2, 1, 2, 1, 2, 2, 2, 1, 3, 1, 2, 2, 4, 1, 3, 1, 4, 2, 2, 1, 5, 2, 2, 2, 4, 1, 4, 1, 4, 2, 2, 2, 7, 1, 2, 2, 5, 1, 5, 1, 4, 3, 2, 1, 7, 2, 3, 2, 4, 1, 5, 2, 5, 2, 2, 1, 8, 1, 2, 3, 6, 2, 5, 1, 4, 2, 4, 1, 9, 1, 2, 3, 4, 2, 5, 1, 7, 4, 2, 1, 8, 2, 2, 2, 6, 1, 8, 2, 4, 2, 2, 2

Offset: 1

Ilya Gutkovskiy, Nov 21 2020

nonn

From Gus Wiseman, Mar 05 2021: (Start)
This sequence counts all of the following essentially equivalent things:
1. Chains of distinct inferior divisors from n to 1, where a divisor d|n is inferior if d <= n/d. Inferior divisors are counted by A038548 and listed by A161906.
2. Chains of divisors from n to 1 whose first-quotients (in analogy with first-differences) are term-wise greater than or equal to their decapitation (maximum element removed). For example, the divisor chain q = 60/4/2/1 has first-quotients (15,2,2), which are >= (4,2,1), so q is counted under a(60).
3. Chains of divisors from n to 1 such that x >= y^2 for all adjacent x, y.
4. Factorizations of n where each factor is greater than or equal to the product of all previous factors.
(End)

			From _Gus Wiseman_, Mar 05 2021: (Start)
The a(n) chains for n = 1, 2, 4, 12, 16, 24, 36, 60:
  1  2/1  4/1    12/1    16/1      24/1      36/1      60/1
          4/2/1  12/2/1  16/2/1    24/2/1    36/2/1    60/2/1
                 12/3/1  16/4/1    24/3/1    36/3/1    60/3/1
                         16/4/2/1  24/4/1    36/4/1    60/4/1
                                   24/4/2/1  36/6/1    60/5/1
                                             36/4/2/1  60/6/1
                                             36/6/2/1  60/4/2/1
                                                       60/6/2/1
The a(n) factorizations for n = 2, 4, 12, 16, 24, 36, 60:
    2  4    12   16     24     36     60
       2*2  2*6  2*8    3*8    4*9    2*30
            3*4  4*4    4*6    6*6    3*20
                 2*2*4  2*12   2*18   4*15
                        2*2*6  3*12   5*12
                               2*2*9  6*10
                               2*3*6  2*2*15
                                      2*3*10
(End)

Alois P. Heinz, Table of n, a(n) for n = 1..65536

Cf. A002033, A008578 (positions of 1's), A068108.
The restriction to powers of 2 is A018819.
Not requiring inferiority gives A074206 (ordered factorizations).
The strictly inferior version is A342083.
The strictly superior version is A342084.
The weakly superior version is A342085.
The additive version is A000929, or A342098 forbidding equality.
A000005 counts divisors, with sum A000203.
A001055 counts factorizations.
A003238 counts chains of divisors summing to n-1, with strict case A122651.
A038548 counts inferior (or superior) divisors.
A056924 counts strictly inferior (or strictly superior) divisors.
A067824 counts strict chains of divisors starting with n.
A167865 counts strict chains of divisors > 1 summing to n.
A207375 lists central divisors.
A253249 counts strict chains of divisors.
A334996 counts ordered factorizations by product and length.
A334997 counts chains of divisors of n by length.
A342086 counts strict factorizations of divisors.
- Inferior: A033676, A066839, A072499, A161906.
- Superior: A033677, A070038, A161908.
- Strictly Inferior: A060775, A070039, A333806, A341674.
- Strictly Superior: A048098, A064052, A140271, A238535, A341673.
Cf. A001248, A006530, A020639, A040039, A045690, A337105, A342087, A342094, A342095, A342096, A342097.

a:= proc(n) option remember; `if`(n=1, 1, add(
      `if`(d<=n/d, a(d), 0), d=numtheory[divisors](n)))
    end:
seq(a(n), n=1..128);  # Alois P. Heinz, Jun 24 2021

a[1] = 1; a[n_] := a[n] = DivisorSum[n, a[#] &, # <= Sqrt[n] &]; Table[a[n], {n, 95}]
(* second program *)
asc[n_]:=Prepend[#,n]&/@Prepend[Join@@Table[asc[d],{d,Select[Divisors[n],#Gus Wiseman, Mar 05 2021 *)

G.f.: Sum_{k>=1} a(k) * x^(k^2) / (1 - x^k).

a(2^n) = A018819(n). - Gus Wiseman, Mar 08 2021

A342087 Number of chains of divisors starting with n and having no adjacent parts x <= y^2.

Original entry on oeis.org

1, 2, 2, 2, 2, 4, 2, 4, 2, 4, 2, 6, 2, 4, 4, 4, 2, 6, 2, 6, 4, 4, 2, 8, 2, 4, 4, 6, 2, 8, 2, 6, 4, 4, 4, 8, 2, 4, 4, 8, 2, 10, 2, 6, 6, 4, 2, 12, 2, 6, 4, 6, 2, 10, 4, 8, 4, 4, 2, 14, 2, 4, 6, 6, 4, 10, 2, 6, 4, 8, 2, 16, 2, 4, 6, 6, 4, 10, 2, 12, 4, 4, 2, 14

Offset: 1

Gus Wiseman, Mar 05 2021

nonn

An alternative wording: Number of chains of divisors starting with n and having all adjacent parts x > y^2.

			The chains for n = 1, 2, 6, 12, 24, 42, 48:
   1    2      6        12        24        42          48
        2/1    6/1      12/1      24/1      42/1        48/1
               6/2      12/2      24/2      42/2        48/2
               6/2/1    12/3      24/3      42/3        48/3
                        12/2/1    24/4      42/6        48/4
                        12/3/1    24/2/1    42/2/1      48/6
                                  24/3/1    42/3/1      48/2/1
                                  24/4/1    42/6/1      48/3/1
                                            42/6/2      48/4/1
                                            42/6/2/1    48/6/1
                                                        48/6/2
                                                        48/6/2/1

Amiram Eldar, Table of n, a(n) for n = 1..10000

The restriction to powers of 2 is A018819.
Not requiring strict inferiority gives A067824.
The weakly inferior version is twice A337135.
The case ending with 1 is counted by A342083.
The strictly superior version is A342084.
The weakly superior version is A342085.
The additive version is A342098, or A000929 allowing equality.
A000005 counts divisors, with sum A000203.
A001055 counts factorizations.
A003238 counts chains of divisors summing to n-1, with strict case A122651.
A038548 counts inferior (or superior) divisors.
A056924 counts strictly inferior (or strictly superior) divisors.
A067824 counts strict chains of divisors starting with n.
A074206 counts ordered factorizations.
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.
Cf. A002033, A006530, A018819, A020639, A337105, A341674, A342086, A342094, A342095, A342097.

cem[n_]:=Prepend[Prepend[#,n]&/@Join@@cem/@Most[Divisors[n]],{n}];
Table[Length[Select[cem[n],And@@Thread[Divide@@@Partition[#,2,1]>Rest[#]]&]],{n,30}]

For n > 1, a(n) = 2*A342083(n).

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

Gus Wiseman, Mar 19 2021

nonn

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).

			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

Wikipedia, Arithmetic progression
Gus Wiseman, Sequences counting and ranking integer partitions by the differences of their successive parts.
Gus Wiseman, Sequences counting and ranking partitions and compositions by their differences and quotients.

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.

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

A342522 Heinz numbers of integer partitions with constant (equal) first quotients.

Original entry on oeis.org

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

Offset: 1

Gus Wiseman, Mar 23 2021

nonn

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).

			The prime indices of 2093 are {4,6,9}, with first quotients (3/2,3/2), so 2093 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}
   18: {1,2,2}
   20: {1,1,3}
   24: {1,1,1,2}
   28: {1,1,4}
   30: {1,2,3}
   36: {1,1,2,2}
   40: {1,1,1,3}
   44: {1,1,5}
   45: {2,2,3}
   48: {1,1,1,1,2}
   50: {1,3,3}
   52: {1,1,6}
   54: {1,2,2,2}
   56: {1,1,1,4}
   60: {1,1,2,3}
   63: {2,2,4}
   66: {1,2,5}

Eric Weisstein's World of Mathematics, Logarithmically Concave Sequence.
Wikipedia, Arithmetic progression
Gus Wiseman, Sequences counting and ranking partitions and compositions by their differences and quotients.

For multiplicities (prime signature) instead of quotients we have A072774.
The version counting strict divisor chains is A169594.
For differences instead of quotients we have A325328 (count: A049988).
These partitions are counted by A342496 (strict: A342515, ordered: A342495).
The distinct instead of equal version is A342521.
A000005 count 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).
A167865 counts strict chains of divisors > 1 summing to n.
A318991/A318992 rank reversed partitions with/without integer quotients.
A342086 counts strict chains of divisors with strictly increasing quotients.
Cf. A003242, A047966, A049980, A056239, A067824, A112798, A118914, A124010, A130091, A181819, A325351, A325352.

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

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

Gus Wiseman, Mar 20 2021

nonn

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).

			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

Eric Weisstein's World of Mathematics, Logarithmically Concave Sequence.
Gus Wiseman, Sequences counting and ranking integer partitions by the differences of their successive parts.
Gus Wiseman, Sequences counting and ranking partitions and compositions by their differences and quotients.

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.

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

A342523 Heinz numbers of integer partitions with weakly increasing first quotients.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 31, 32, 33, 34, 35, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 51, 52, 53, 55, 56, 57, 58, 59, 61, 62, 63, 64, 65, 66, 67, 68, 69, 71, 73, 74, 76

Offset: 1

Gus Wiseman, Mar 23 2021

nonn

Also called log-concave-up 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).

			The prime indices of 60 are {1,1,2,3}, with first quotients (1,2,3/2), so 60 is not in the sequence.
Most small numbers are in the sequence, but the sequence of non-terms together with their prime indices begins:
   18: {1,2,2}
   30: {1,2,3}
   36: {1,1,2,2}
   50: {1,3,3}
   54: {1,2,2,2}
   60: {1,1,2,3}
   70: {1,3,4}
   72: {1,1,1,2,2}
   75: {2,3,3}
   90: {1,2,2,3}
   98: {1,4,4}
  100: {1,1,3,3}

Robert Price, Table of n, a(n) for n = 1..10000
Eric Weisstein's World of Mathematics, Logarithmically Concave Sequence.
Gus Wiseman, Sequences counting and ranking integer partitions by the differences of their successive parts.
Gus Wiseman, Sequences counting and ranking partitions and compositions by their differences and quotients.

The version counting strict divisor chains is A057567.
For multiplicities (prime signature) instead of quotients we have A304678.
For differences instead of quotients we have A325360 (count: A240026).
These partitions are counted by A342523 (strict: A342516, ordered: A342492).
The strictly increasing version is A342524.
The weakly decreasing version is A342526.
A000041 counts partitions (strict: A000009).
A000929 counts partitions with adjacent parts x >= 2y.
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.
A342086 counts strict chains of divisors with strictly increasing quotients.
Cf. A000005, A002843, A056239, A067824, A112798, A124010, A130091, A238710, A253249, A325351, A325352, A342191.

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

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

Gus Wiseman, Mar 25 2021

nonn

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).

			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.

Gus Wiseman, Sequences counting and ranking partitions and compositions by their differences and quotients.

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.

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

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

A342517 Number of strict integer partitions of n with strictly increasing first quotients.

Original entry on oeis.org

1, 1, 1, 2, 2, 3, 3, 4, 5, 6, 7, 8, 8, 10, 11, 13, 14, 16, 16, 19, 21, 23, 27, 29, 31, 34, 36, 40, 43, 47, 49, 53, 56, 59, 66, 71, 75, 81, 86, 89, 97, 104, 110, 119, 123, 132, 143, 148, 156, 168, 177, 184, 198, 209, 218, 232, 246, 257, 269, 282, 294

Offset: 0

Gus Wiseman, Mar 20 2021

nonn

Also the number of reversed strict partitions of n with strictly increasing 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).

			The partition (14,8,5,3,2) has first quotients (4/7,5/8,3/5,2/3) so is not counted under a(32), even though the differences (-6,-3,-2,-1) are strictly increasing.
The a(1) = 1 through a(13) = 10 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
                              61   71    72    82    83    93    94
                                   521   81    91    92    A2    A3
                                         621   532   A1    B1    B2
                                               721   632   732   C1
                                                     821   921   643
                                                                 832
                                                                 A21

Eric Weisstein's World of Mathematics, Logarithmically Concave Sequence.
Gus Wiseman, Sequences counting and ranking integer partitions by the differences of their successive parts.
Gus Wiseman, Sequences counting and ranking partitions and compositions by their differences and quotients.

The version for differences instead of quotients is A179254.
The version for chains of divisors is A342086 (non-strict: A057567).
The non-strict ordered version is A342493.
The non-strict version is A342498 (ranking: A342524).
The weakly increasing version is A342516.
The strictly decreasing version is A342518.
A000041 counts partitions (strict: A000009).
A001055 counts factorizations (strict: A045778, ordered: A074206).
A003238 counts chains of divisors summing to n - 1 (strict: A122651).
A045690 counts sets with maximum n with all adjacent elements y < 2x.
A167865 counts strict chains of divisors > 1 summing to n.
A342096 counts partitions with all adjacent parts x < 2y (strict: A342097).
A342098 counts (strict) partitions with all adjacent parts x > 2y.
Cf. A000005, A003114, A003242, A005117, A018819, A067824, A238710, A253249, A318991, A318992.

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

cp's OEIS Frontend

A342083 Number of chains of strictly inferior divisors from n to 1.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A169594 Number of divisors of n, counting divisor multiplicity in n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

PARI

PARI

PARI

Python

Scheme

Formula

Extensions

A337135 a(1) = 1; for n > 1, a(n) = Sum_{d|n, d <= sqrt(n)} a(d).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Formula

A342087 Number of chains of divisors starting with n and having no adjacent parts x <= y^2.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

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

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A342522 Heinz numbers of integer partitions with constant (equal) first quotients.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

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

Views

Author

Keywords

Comments

Examples

Links