A238689 -id:A238689 - cp's OEIS frontend

A238690 Let each integer m (1 <= m <= n) be factorized as m = prime_m(1)prime_m(2)...*prime_m(bigomega(m)), with the primes sorted in nonincreasing order. Then a(n) is the number of values of m such that each prime_m(i) <= prime_n(i).

1, 2, 3, 3, 4, 5, 5, 4, 6, 7, 6, 7, 7, 9, 9, 5, 8, 9, 9, 10, 12, 11, 10, 9, 10, 13, 10, 13, 11, 14, 12, 6, 15, 15, 14, 12, 13, 17, 18, 13, 14, 19, 15, 16, 16, 19, 16, 11, 15, 16, 21, 19, 17, 14, 18, 17, 24, 21, 18, 19, 19, 23, 22, 7, 22, 24, 20, 22, 27, 23, 21

Offset: 1

Matthew Vandermast, Apr 28 2014

nonn

Equivalently, a(n) equals the number of values of m such that each value of A238689 T(m,k) <= A238689 T(n,k). (Since the prime factorization of 1 is the empty factorization, we consider each prime_1(i) not to be greater than prime_n(i) for all positive integers n.)
Suppose we say that n "covers" m iff both m and n are factorized as described in the sequence definition and each prime_m(i) <= prime_n(i). At least three sequences (A037019, A108951 and A181821) have the property that a(m) divides a(n) iff n "covers" m.  These sequences are also divisibility sequences (i.e., sequences with the property that a(m) divides a(n) if m divides n), since any positive integer "covers" each of its divisors.
For any positive integers m and k, the following integer sequences (with n >= 0) are arithmetic progressions:
1. The sequence b(n) = a(m*(2^n)).
2. The sequence b(n) = a(m*(prime(n+k))) if prime(k) >= A006530(m).
Also, a(n) = the number of distinct prime signatures that occur among the divisors of any integer m such that A181819(m) = n and/or A238745(m) = n.
Number of skew partitions whose numerator has Heinz number n, where a skew partition is a pair y/v of integer partitions such that the diagram of v fits inside the diagram of y. The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). - Gus Wiseman, Feb 24 2018

			The prime factorizations of integers 1 through 9, with prime factors sorted from largest to smallest:
1 - the empty factorization (no prime factors)
2 = 2
3 = 3
4 = 2*2
5 = 5
6 = 3*2
7 = 7
8 = 2*2*2
9 = 3*3
To find a(9), we consider 9 = 3*3. There are 6 positive integers (1, 2, 3, 4, 6 and 9) which satisfy the following criteria:
1) The largest prime factor, if one exists, is not greater than 3;
2) The second-largest prime factor, if one exists, is not greater than 3;
3) The total number of prime factors (counting repeated factors) does not exceed 2.
Therefore, a(9) = 6.
From _Gus Wiseman_, Feb 24 2018: (Start)
Heinz numbers of the a(15) = 9 partitions contained within the partition (32) are 1, 2, 3, 4, 5, 6, 9, 10, 15. The a(15) = 9 skew partitions are (32)/(), (32)/(1), (32)/(11), (32)/(2), (32)/(21), (32)/(22), (32)/(3), (32)/(31), (32)/(32).
Corresponding diagrams are:
  o o o   . o o   . o o   . . o   . . o   . . o   . . .   . . .   . . .
  o o     o o     . o     o o     . o     . .     o o     . o     . .    (End)

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

Rearrangement of A115728, A115729 and A238746. A116473(n) is the number of times n appears in the sequence.

Cf. A000041, A000085, A000720, A056239, A063834, A112798, A122111, A153452, A215366, A238689, A259478, A259480, A296150, A296188, A296561, A297388, A299925, A299926, A299966, A299967.

undptns[y_]:=Select[Tuples[Range[0,#]&/@y],OrderedQ[#,GreaterEqual]&];
primeMS[n_]:=If[n===1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Table[Length[undptns[Reverse[primeMS[n]]]],{n,100}] (* Gus Wiseman, Feb 24 2018 *)

a(n) = A085082(A108951(n)) = A085082(A181821(n)).
a(n) = a(A122111(n)).
a(prime(n)) = a(2^n) = n+1.
a((prime(n))^m) = a((prime(m))^n) = binomial(n+m, n).
a(A002110(n)) = A000108(n+1).
A000005(n) <= a(n) <= n.

A375398 Numbers k such that the minima of maximal anti-runs in the weakly increasing sequence of prime factors of k (with multiplicity) are distinct.

Original entry on oeis.org

1, 2, 3, 5, 6, 7, 10, 11, 13, 14, 15, 17, 18, 19, 21, 22, 23, 26, 29, 30, 31, 33, 34, 35, 37, 38, 39, 41, 42, 43, 46, 47, 50, 51, 53, 55, 57, 58, 59, 61, 62, 65, 66, 67, 69, 70, 71, 73, 74, 75, 77, 78, 79, 82, 83, 85, 86, 87, 89, 90, 91, 93, 94, 95, 97, 98

Offset: 1

Gus Wiseman, Aug 16 2024

nonn

First differs from A375402 in lacking 20.
An anti-run is a sequence with no adjacent equal parts.
The minima of maximal anti-runs in a sequence are obtained by splitting it into maximal anti-run subsequences and taking the least term of each.
Note the prime factors can alternatively be taken in weakly decreasing order.

			The prime factors of 300 are {2,2,3,5,5}, with maximal anti-runs ((2),(2,3,5),(5)), with minima (2,2,5), so 300 is not in the sequence.
The prime factors of 450 are {2,3,3,5,5}, with maximal anti-runs ((2,3),(3,5),(5)), with minima (2,3,5), so 450 is in the sequence.

Gus Wiseman, Sequences counting and ranking compositions by their leaders (for six types of runs).

A version for compositions is A374638, counted by A374518.
These are positions of strict rows in A375128, sums A374706, ranks A375400.
Partitions (or reversed partitions) of this type are counted by A375134.
For identical instead of distinct we have A375396, counted by A115029.
The complement is A375399, counted by A375404.
For maxima instead of minima we have A375402, counted by A375133.
The complement for maxima is A375403, counted by A375401.
A000041 counts integer partitions, strict A000009.
A003242 counts anti-run compositions, ranks A333489.
A number's prime factors (A027746, reverse A238689) have sum A001414, min A020639, max A006530.
A number's prime indices (A112798, reverse A296150) have sum A056239, min A055396, max A061395.
Both have length A001222, distinct A001221.
Cf. A034296, A036785, A046660, A065200, A065201, A358836, A374632, A374761, A374767, A374768, A375136.

Select[Range[100],UnsameQ@@Min /@ Split[Flatten[ConstantArray@@@FactorInteger[#]],UnsameQ]&]

A375399 Numbers k such that the minima of maximal anti-runs in the weakly increasing sequence of prime factors of k (with multiplicity) are not distinct.

Original entry on oeis.org

4, 8, 9, 12, 16, 20, 24, 25, 27, 28, 32, 36, 40, 44, 45, 48, 49, 52, 54, 56, 60, 63, 64, 68, 72, 76, 80, 81, 84, 88, 92, 96, 99, 100, 104, 108, 112, 116, 117, 120, 121, 124, 125, 128, 132, 135, 136, 140, 144, 148, 152, 153, 156, 160, 162, 164, 168, 169, 171

Offset: 1

Gus Wiseman, Aug 16 2024

nonn

An anti-run is a sequence with no adjacent equal terms.
The minima of maximal anti-runs in a sequence are obtained by splitting it into maximal anti-run subsequences and taking the least term of each.
Note the prime factors can alternatively be taken in weakly decreasing order.

			The prime factors of 300 are {2,2,3,5,5}, with maximal anti-runs ((2),(2,3,5),(5)), with minima (2,2,5), so 300 is in the sequence.
The prime factors of 450 are {2,3,3,5,5}, with maximal anti-runs ((2,3),(3,5),(5)), with minima (2,3,5), so 450 is not in the sequence.
The terms together with their prime indices begin:
     4: {1,1}
     8: {1,1,1}
     9: {2,2}
    12: {1,1,2}
    16: {1,1,1,1}
    20: {1,1,3}
    24: {1,1,1,2}
    25: {3,3}
    27: {2,2,2}
    28: {1,1,4}
    32: {1,1,1,1,1}
    36: {1,1,2,2}
    40: {1,1,1,3}
    44: {1,1,5}
    45: {2,2,3}
    48: {1,1,1,1,2}

Gus Wiseman, Sequences counting and ranking compositions by their leaders (for six types of runs).

The complement for compositions is A374638, counted by A374518.
A version for compositions is A374639, counted by A374678.
Positions of non-strict rows in A375128, sums A374706, ranks A375400.
For identical instead of strict we have A375397, counted by A375405.
The complement is A375398, counted by A375134.
The complement for maxima instead of minima is A375402, counted by A375133.
For maxima instead of minima we have A375403, counted by A375401.
Partitions (or reversed partitions) of this type are counted by A375404.
A000041 counts integer partitions, strict A000009.
A003242 counts anti-run compositions, ranks A333489.
A number's prime factors (A027746, reverse A238689) have sum A001414, min A020639, max A006530.
A number's prime indices (A112798, reverse A296150) have sum A056239, min A055396, max A061395.
Both have length A001222, distinct A001221.
Cf. A034296, A046660, A065200, A065201, A115029, A279790, A374632, A374761, A375136, A375396.

Select[Range[100],!UnsameQ@@Min /@ Split[Flatten[ConstantArray@@@FactorInteger[#]],UnsameQ]&]

A375396 Numbers not divisible by the square of any prime factor except (possibly) the least. Hooklike numbers.

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, 30, 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, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71

Offset: 1

Gus Wiseman, Aug 16 2024

nonn

Also numbers k such that the minima of the maximal anti-runs in the weakly increasing sequence of prime factors of k (with multiplicity) are identical. Here, an anti-run is a sequence with no adjacent equal parts, and the minima of the maximal anti-runs in a sequence are obtained by splitting it into maximal anti-run subsequences and taking the least term of each. Note the prime factors can alternatively be taken in weakly decreasing order.
The complement is a superset of A036785 = products of a squarefree number and a prime power.
The asymptotic density of this sequence is (1/zeta(2)) * (1 + Sum_{p prime} (1/(p^2-p)) / Product_{primes q <= p} (1 + 1/q)) = 0.884855661165... . - Amiram Eldar, Oct 26 2024

			The prime factors of 300 are {2,2,3,5,5}, with maximal anti-runs {{2},{2,3,5},{5}}, with minima (2,2,5), so 300 is not in the sequence.

Amiram Eldar, Table of n, a(n) for n = 1..10000
Gus Wiseman, Sequences counting and ranking compositions by their leaders (for six types of runs).

The complement is a superset of A036785.
For maxima instead of minima we have A065200, counted by A034296.
The complement for maxima is A065201, counted by A239955.
Partitions of this type are counted by A115029.
A version for compositions is A374519, counted by A374517.
Also positions of identical rows in A375128, sums A374706, ranks A375400.
The complement is A375397, counted by A375405.
For distinct instead of identical minima we have A375398, counts A375134.
The complement for distinct minima is A375399, counted by A375404.
A000041 counts integer partitions, strict A000009.
A003242 counts anti-run compositions, ranks A333489.
A011782 comps counts compositions.
A number's prime factors (A027746, reverse A238689) have sum A001414, min A020639, max A006530.
A number's prime indices (A112798, reverse A296150) have sum A056239, min A055396, max A061395.
Both have length A001222, distinct A001221.
See the formula section for the relationships with A005117, A028234.
Cf. A000005, A013661, A046660, A272919, A319066, A358905, A374686, A374704, A374742, A375133, A375136, A375401.

Select[Range[100],SameQ@@Min /@ Split[Flatten[ConstantArray@@@FactorInteger[#]],UnsameQ]&]

is(k) = if(k > 1, my(e = factor(k)[, 2]); vecprod(e) == e[1], 1); \\ Amiram Eldar, Oct 26 2024

{a(n)} = {k >= 1 : A028234(k) is in A005117}. - Peter Munn, May 09 2025

A375400 Heinz number of the multiset of minima of maximal anti-runs in the weakly increasing prime indices of n.

Original entry on oeis.org

1, 2, 3, 4, 5, 2, 7, 8, 9, 2, 11, 4, 13, 2, 3, 16, 17, 6, 19, 4, 3, 2, 23, 8, 25, 2, 27, 4, 29, 2, 31, 32, 3, 2, 5, 12, 37, 2, 3, 8, 41, 2, 43, 4, 9, 2, 47, 16, 49, 10, 3, 4, 53, 18, 5, 8, 3, 2, 59, 4, 61, 2, 9, 64, 5, 2, 67, 4, 3, 2, 71, 24, 73, 2, 15, 4, 7

Offset: 1

Gus Wiseman, Aug 17 2024

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.
An anti-run is a sequence with no adjacent equal parts. The minima of maximal anti-runs in a sequence are obtained by splitting it into maximal anti-run subsequences and taking the least term of each.
A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.

			The prime indices of 540 are (1,1,2,2,2,3), with maximal anti-runs ((1),(1,2),(2),(2,3)), with minima (1,1,2,2), with Heinz number 36, so a(540) = 36.
The prime indices of 990 are (1,2,2,3,5), with maximal anti-runs ((1,2),(2,3,5)), with minima (1,2), with Heinz number 6, so a(990) = 6.

bigomega is A001222(a(n)) = A375136(n).
Least prime factor is A020639(a(n)) = A020639(n).
Least prime index is A055396(a(n)) = A055396(n).
Heinz weights are A056239(a(n)) = A374706(n).
The greatest prime index A061395(a(n)) is the maximum of row n of A375128.
Firsts for omega (except first term) are half A061742.
Prime indices A112798(a(n)) are row n of A375128.
Positions of prime-powers are A375396, counted by A115029.
Positions of squarefree numbers are A375398, counted by A375134.
A000041 counts integer partitions, strict A000009.
A027748 lists distinct prime factors, sum A008472.
A304038 lists distinct prime indices, sum A066328.
A number's prime factors (A027746, reverse A238689) have sum A001414, min A020639, max A006530.
A number's prime indices (A112798, reverse A296150) have sum A056239, min A055396, max A061395.
Both have length A001222, distinct A001221.
Cf. A000040, A046660, A124768, A320324, A358836, A374683, A374700, A375133.

Table[Times@@Prime/@If[n==1,{},Min /@ Split[Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]],UnsameQ]],{n,100}]

A375402 Numbers whose maximal anti-runs of weakly increasing prime factors (with multiplicity) have distinct maxima.

Original entry on oeis.org

1, 2, 3, 5, 6, 7, 10, 11, 12, 13, 14, 15, 17, 19, 20, 21, 22, 23, 26, 28, 29, 30, 31, 33, 34, 35, 37, 38, 39, 41, 42, 43, 44, 45, 46, 47, 51, 52, 53, 55, 57, 58, 59, 60, 61, 62, 63, 65, 66, 67, 68, 69, 70, 71, 73, 74, 76, 77, 78, 79, 82, 83, 84, 85, 86, 87, 89

Offset: 1

Gus Wiseman, Aug 14 2024

nonn

First differs from A349810 in lacking 150.
An anti-run is a sequence with no adjacent equal terms. The maxima of maximal anti-runs in a sequence are obtained by splitting it into maximal anti-run subsequences and taking the greatest term of each.
The partitions with these Heinz numbers are those with (1) no part appearing more than twice and (2) the greatest part appearing only once.
Note the prime factors can alternatively be written in weakly decreasing order.
How is does the sequence relate to A317092? - R. J. Mathar, Aug 20 2024

			The maximal anti-runs of prime factors of 150 are ((2,3,5),(5)), with maxima (5,5), so 150 is not in the sequence.
The maximal anti-runs of prime factors of 180 are ((2),(2,3),(3,5)), with maxima (2,3,5), so 180 is in the sequence.
The maximal anti-runs of prime factors of 300 are ((2),(2,3,5),(5)), with maxima (2,5,5), so 300 is not in the sequence.

For identical instead of distinct we have A065200, complement A065201.
A version for compositions (instead of partitions) is A374767.
Partitions of this type are counted by A375133.
For minima instead of maxima we have A375398, counted by A375134.
The complement for minima is A375399, counted by A375404.
The complement is A375403, counted by A375401.
A000041 counts integer partitions, strict A000009.
A003242 counts anti-run compositions, ranks A333489.
A number's prime factors (A027746, reverse A238689) have sum A001414, min A020639, max A006530.
A number's prime indices (A112798, reverse A296150) have sum A056239, min A055396, max A061395.
Both have length A001222, distinct A001221.
Cf. A046660, A066328, A358830, A374632, A374706, A374768, A375128, A375136, A375396, A375400.

Select[Range[150],UnsameQ@@Max /@ Split[Flatten[ConstantArray@@@FactorInteger[#]],UnsameQ]&]

A375397 Numbers divisible by the square of some prime factor other than the least. Non-hooklike numbers.

Original entry on oeis.org

18, 36, 50, 54, 72, 75, 90, 98, 100, 108, 126, 144, 147, 150, 162, 180, 196, 198, 200, 216, 225, 234, 242, 245, 250, 252, 270, 288, 294, 300, 306, 324, 338, 342, 350, 360, 363, 375, 378, 392, 396, 400, 414, 432, 441, 450, 468, 484, 486, 490, 500, 504, 507, 522

Offset: 1

Gus Wiseman, Aug 16 2024

nonn

Contains no squarefree numbers A005117 or prime powers A000961, but some perfect powers A131605.
Also numbers k such that the minima of the maximal anti-runs in the weakly increasing sequence of prime factors of k (with multiplicity) are not identical. Here, an anti-run is a sequence with no adjacent equal parts, and the minima of the maximal anti-runs in a sequence are obtained by splitting it into maximal anti-run subsequences and taking the least term of each. Note the prime factors can alternatively be taken in weakly decreasing order.
Includes all terms of A036785 = non-products of a squarefree number and a prime power.
The asymptotic density of this sequence is 1 - (1/zeta(2)) * (1 + Sum_{p prime} (1/(p^2-p)) / Product_{primes q <= p} (1 + 1/q)) = 0.11514433883... . - Amiram Eldar, Oct 26 2024

			The prime factors of 300 are {2,2,3,5,5}, with maximal anti-runs ((2),(2,3,5),(5)), with minima (2,2,5), so 300 is in the sequence.
The terms together with their prime indices begin:
    18: {1,2,2}
    36: {1,1,2,2}
    50: {1,3,3}
    54: {1,2,2,2}
    72: {1,1,1,2,2}
    75: {2,3,3}
    90: {1,2,2,3}
    98: {1,4,4}
   100: {1,1,3,3}
   108: {1,1,2,2,2}
   126: {1,2,2,4}
   144: {1,1,1,1,2,2}

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

A superset of A036785.
The complement for maxima is A065200, counted by A034296.
For maxima instead of minima we have A065201, counted by A239955.
A version for compositions is A374520, counted by A374640.
Also positions of non-constant rows in A375128, sums A374706, ranks A375400.
The complement is A375396, counted by A115029.
The complement for distinct minima is A375398, counted by A375134.
For distinct instead of identical minima we have A375399, counts A375404.
Partitions of this type are counted by A375405.
A000041 counts integer partitions, strict A000009.
A003242 counts anti-run compositions, ranks A333489.
A number's prime factors (A027746, reverse A238689) have sum A001414, min A020639, max A006530.
A number's prime indices (A112798, reverse A296150) have sum A056239, min A055396, max A061395.
Both have length A001222, distinct A001221.
Cf. A000005, A013661, A046660, A272919, A319066, A358905, A374686, A374704, A374742, A375133, A375136, A375401.

Select[Range[100],!SameQ@@Min /@ Split[Flatten[ConstantArray@@@FactorInteger[#]],UnsameQ]&]

is(k) = if(k > 1, my(e = factor(k)[, 2]); vecprod(e) > e[1], 0); \\ Amiram Eldar, Oct 26 2024

Name edited by Peter Munn, May 08 2025

A375403 Numbers whose maximal anti-runs of weakly increasing prime factors (with multiplicity) do not have distinct maxima.

Original entry on oeis.org

4, 8, 9, 16, 18, 24, 25, 27, 32, 36, 40, 48, 49, 50, 54, 56, 64, 72, 75, 80, 81, 88, 96, 98, 100, 104, 108, 112, 120, 121, 125, 128, 135, 136, 144, 147, 150, 152, 160, 162, 168, 169, 176, 184, 189, 192, 196, 200, 208, 216, 224, 225, 232, 240, 242, 243, 245

Offset: 1

Gus Wiseman, Aug 15 2024

nonn

First differs from A299117 in having 150.
An anti-run is a sequence with no adjacent equal terms. The maxima of maximal anti-runs in a sequence are obtained by splitting it into maximal anti-run subsequences and taking the greatest term of each.
The partitions with these Heinz numbers are those with (1) some part appearing more than twice or (2) the greatest part appearing more than once.
Note the prime factors can alternatively be written in weakly decreasing order.

			The maximal anti-runs of prime factors of 150 are ((2,3,5),(5)), with maxima (5,5), so 150 is in the sequence.
The maximal anti-runs of prime factors of 180 are ((2),(2,3),(3,5)), with maxima (2,3,5), so 180 is not in the sequence.
The maximal anti-runs of prime factors of 300 are ((2),(2,3,5),(5)), with maxima (2,5,5), so 300 is in the sequence.
The terms together with their prime indices begin:
    4: {1,1}
    8: {1,1,1}
    9: {2,2}
   16: {1,1,1,1}
   18: {1,2,2}
   24: {1,1,1,2}
   25: {3,3}
   27: {2,2,2}
   32: {1,1,1,1,1}
   36: {1,1,2,2}
   40: {1,1,1,3}
   48: {1,1,1,1,2}

For identical instead of distinct we have A065201, complement A065200.
The complement for minima is A375398, counted by A375134.
For minima instead of maxima we have A375399, counted by A375404.
Partitions of this type are counted by A375401.
The complement is A375402, counted by A375133.
A000041 counts integer partitions, strict A000009.
A003242 counts anti-run compositions, ranks A333489.
A number's prime factors (A027746, reverse A238689) have sum A001414, min A020639, max A006530.
A number's prime indices (A112798, reverse A296150) have sum A056239, min A055396, max A061395.
Both have length A001222, distinct A001221.
Cf. A046660, A066328, A358836, A374632, A374706, A374768, A374767, A375128, A375136, A375396, A375400.

Select[Range[150],!UnsameQ@@Max /@ Split[Flatten[ConstantArray@@@FactorInteger[#]],UnsameQ]&]

A302170 Irregular triangle T(n,k) read by rows: first row is 1, n-th row (n > 1) lists distinct prime factors of n in decreasing order.

Original entry on oeis.org

1, 2, 3, 2, 5, 3, 2, 7, 2, 3, 5, 2, 11, 3, 2, 13, 7, 2, 5, 3, 2, 17, 3, 2, 19, 5, 2, 7, 3, 11, 2, 23, 3, 2, 5, 13, 2, 3, 7, 2, 29, 5, 3, 2, 31, 2, 11, 3, 17, 2, 7, 5, 3, 2, 37, 19, 2, 13, 3, 5, 2, 41, 7, 3, 2, 43, 11, 2, 5, 3, 23, 2, 47, 3, 2, 7, 5, 2, 17, 3, 13, 2, 53, 3, 2, 11, 5, 7, 2, 19, 3, 29, 2, 59, 5, 3, 2, 61, 31, 2

Offset: 1

Ilya Gutkovskiy, Apr 02 2018

			The irregular triangle begins:
1:  {1}
2:  {2}
3:  {3}
4:  {2}
5:  {5}
6:  {3, 2}
7:  {7}
8:  {2}
9:  {3}
10: {5, 2}
11: {11}
12: {3, 2}

Eric Weisstein's World of Mathematics, Distinct Prime Factors

Cf. A001221 (row lengths), A006530, A008472 (row sums), A020639, A027746, A027748 (another version), A027750, A056538, A085307, A238689.

a302170 n k = a302170_tabl !! (n-1) !! (k-1)
a302170_tabl = map a302170_row [1..]
a302170_row = reverse . a027748_row
-- Brian Chess, Sep 19 2022

Flatten[Table[Reverse[FactorInteger[n][[All, 1]]], {n, 1, 62}]]

T(n,1) = A006530(n).

T(n,A001221(n)) = A020639(n).

cp's OEIS Frontend

A238690 Let each integer m (1 <= m <= n) be factorized as m = prime_m(1)*prime_m(2)*...*prime_m(bigomega(m)), with the primes sorted in nonincreasing order. Then a(n) is the number of values of m such that each prime_m(i) <= prime_n(i).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A375398 Numbers k such that the minima of maximal anti-runs in the weakly increasing sequence of prime factors of k (with multiplicity) are distinct.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A375399 Numbers k such that the minima of maximal anti-runs in the weakly increasing sequence of prime factors of k (with multiplicity) are not distinct.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A375396 Numbers not divisible by the square of any prime factor except (possibly) the least. Hooklike numbers.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

A375400 Heinz number of the multiset of minima of maximal anti-runs in the weakly increasing prime indices of n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A375402 Numbers whose maximal anti-runs of weakly increasing prime factors (with multiplicity) have distinct maxima.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A375397 Numbers divisible by the square of some prime factor other than the least. Non-hooklike numbers.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Extensions

A375403 Numbers whose maximal anti-runs of weakly increasing prime factors (with multiplicity) do not have distinct maxima.

Views

Author

Keywords

Comments

Examples

A238690 Let each integer m (1 <= m <= n) be factorized as m = prime_m(1)prime_m(2)...*prime_m(bigomega(m)), with the primes sorted in nonincreasing order. Then a(n) is the number of values of m such that each prime_m(i) <= prime_n(i).