A212171 -id:A212171 - cp's OEIS frontend

A124010 Triangle in which first row is 0, n-th row (n>1) lists the exponents of distinct prime factors ("ordered prime signature") in the prime factorization of n.

0, 1, 1, 2, 1, 1, 1, 1, 3, 2, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 4, 1, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 3, 1, 2, 1, 1, 3, 2, 1, 1, 1, 1, 1, 1, 5, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 4, 1, 2, 1, 2, 1, 1, 2, 1, 1, 1, 3, 1, 1, 3, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 2, 1, 6, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 3, 2, 1

Offset: 1

Franklin T. Adams-Watters, Nov 01 2006

A001222(n) = Sum(T(n,k), 1 <= k <= A001221(n)); A005361(n) = Product(T(n,k), 1 <= k <= A001221(n)), n>1; A051903(n) = Max(T(n,k): 1 <= k <= A001221(n)); A051904(n) = Min(T(n,k), 1 <= k <= A001221(n)); A067029(n) = T(n,1); A071178(n) = T(n,A001221(n)); A064372(n)=Sum(A064372(T(n,k)), 1 <= k <= A001221(n)). - Reinhard Zumkeller, Aug 27 2011
Any finite sequence of natural numbers appears as consecutive terms. - Paul Tek, Apr 27 2013
For n > 1: n-th row = n-th row of A067255 without zeros. - Reinhard Zumkeller, Jun 11 2013
Most often the prime signature is given as a sorted representative of the multiset of the nonzero exponents, either in increasing order, which yields A118914, or, most commonly, in decreasing order, which yields A212171. - M. F. Hasler, Oct 12 2018

			Initial values of exponents are:
1, [0]
2, [1]
3, [1]
4, [2]
5, [1]
6, [1, 1]
7, [1]
8, [3]
9, [2]
10, [1, 1]
11, [1]
12, [2, 1]
13, [1]
14, [1, 1]
15, [1, 1]
16, [4]
17, [1]
18, [1, 2]
19, [1]
20, [2, 1]
...

Reinhard Zumkeller, Rows n = 1..10000 of triangle, flattened
Index entries for sequences computed from exponents in factorization of n

Cf. A027748, A001221 (row lengths, n>1), A001222 (row sums), A027746, A020639, A064372, A067029 (first column).

Sorted rows: A118914, A212171.

a124010 n k = a124010_tabf !! (n-1) !! (k-1)
a124010_row 1 = [0]
a124010_row n = f n a000040_list where
   f 1 _      = []
   f u (p:ps) = h u 0 where
     h v e | m == 0 = h v' (e + 1)
           | m /= 0 = if e > 0 then e : f v ps else f v ps
           where (v',m) = divMod v p
a124010_tabf = map a124010_row [1..]
-- Reinhard Zumkeller, Jun 12 2013, Aug 27 2011

expts:=proc(n) local t1,t2,t3,t4,i; if n=1 then RETURN([0]); fi; if isprime(n) then RETURN([1]); fi; t1:=ifactor(n); if nops(factorset(n))=1 then RETURN([op(2,t1)]); fi; t2:=nops(t1); t3:=[]; for i from 1 to t2 do t4:=op(i,t1); if nops(t4) = 1 then t3:=[op(t3),1]; else t3:=[op(t3),op(2,t4)]; fi; od; RETURN(t3); end; # N. J. A. Sloane, Dec 20 2007
PrimeSignature := proc(n) local F, e, k; F := ifactors(n)[2]; [seq(e, e = seq(F[k][2], k = 1..nops(F)))] end:
ListTools:-Flatten([[0], seq(PrimeSignature(n), n = 1..73)]); # Peter Luschny, Jun 15 2025

row[1] = {0}; row[n_] := FactorInteger[n][[All, 2]] // Flatten; Table[row[n], {n, 1, 80}] // Flatten (* Jean-François Alcover, Aug 19 2013 *)

print1(0); for(n=2,50, f=factor(n)[,2]; for(i=1,#f,print1(", "f[i]))) \\ Charles R Greathouse IV, Nov 07 2014

A124010_row(n)=if(n,factor(n)[,2]~,[0]) \\ M. F. Hasler, Oct 12 2018

from sympy import factorint
def a(n):
    f=factorint(n)
    return [0] if n==1 else [f[i] for i in f]
for n in range(1, 21): print(a(n)) # Indranil Ghosh, May 16 2017

n = Product_k A027748(n,k)^a(n,k).

Name edited by M. F. Hasler, Apr 08 2022

A118914 Table of the prime signatures (sorted lists of exponents of distinct prime factors) of the positive integers.

Original entry on oeis.org

1, 1, 2, 1, 1, 1, 1, 3, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 4, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1, 1, 3, 2, 1, 1, 3, 1, 2, 1, 1, 1, 1, 1, 5, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 4, 2, 1, 2, 1, 1, 1, 2, 1, 1, 3, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 6, 1, 1

Offset: 2

Eric W. Weisstein, May 05 2006

Since the prime factorization of 1 is the empty product (i.e., the multiplicative identity, 1), it follows that the prime signature of 1 is the empty multiset { }. (Cf. http://oeis.org/wiki/Prime_signature)
MathWorld wrongly defines the prime signature of 1 as {1}, which is actually the prime signature of primes.
The sequences A025487, A036035, A046523 consider the prime signatures of 1 and 2 to be distinct, implying { } for 1 and {1} for 2.
Since the prime signature of n is a partition of Omega(n), also true for Omega(1) = 0, the order of exponents is only a matter of convention (using reverse sorted lists of exponents would create a different sequence).
Here the multisets of nonzero exponents are sorted in increasing order; it is slightly more common to order them, as the parts of partitions, in decreasing order. This yields A212171. - M. F. Hasler, Oct 12 2018

			The table starts:
  n : prime signature of n  (factorization of n)
  1 : {},                   (empty product)
  2 : {1},                  (2^1)
  3 : {1},                  (3^1)
  4 : {2},                  (2^2)
  5 : {1},                  (5^1)
  6 : {1, 1},               (2^1 * 3^1)
  7 : {1},                  (5^1)
  8 : {3},                  (2^3)
  9 : {2},                  (3^2)
  10 : {1, 1},              (2^1 * 5^1)
  11 : {1},                 (11^1)
  12 : {1, 2},              (2^2 * 3^1, but exponents are sorted increasingly)
  etc.

Reinhard Zumkeller, Rows n = 2..1000 of table, flattened
Nicholas John Bizzell-Browning, LIE scales: Composing with scales of linear intervallic expansion, Ph. D. Thesis, Brunel Univ. (UK, 2024). See p. 73.
Eric Weisstein's World of Mathematics, Prime Signature
OEIS Wiki, Prime signatures
OEIS Wiki, Ordered prime signatures

Cf. A025487, A036035, A046523, A095904.
Cf. A124010.
Cf. A001221 (row lengths), A001222 (row sums).

import Data.List (sort)
a118914 n k = a118914_tabf !! (n-2) !! (k-1)
a118914_row n = a118914_tabf !! (n-2)
a118914_tabf = map sort $ tail a124010_tabf
-- Reinhard Zumkeller, Mar 23 2014

primeSignature[n_] := Sort[ FactorInteger[n] , #1[[2]] < #2[[2]]&][[All, 2]]; Flatten[ Table[ primeSignature[n], {n, 2, 65}]](* Jean-François Alcover, Nov 16 2011 *)

A118914_row(n)=vecsort(factor(n)[,2]~) \\ M. F. Hasler, Oct 12 2018

Corrected and edited by Daniel Forgues, Dec 22 2010

A212172 Row n of table represents second signature of n: list of exponents >= 2 in canonical prime factorization of n, in nonincreasing order, or 0 if no such exponent exists.

Original entry on oeis.org

0, 0, 0, 2, 0, 0, 0, 3, 2, 0, 0, 2, 0, 0, 0, 4, 0, 2, 0, 2, 0, 0, 0, 3, 2, 0, 3, 2, 0, 0, 0, 5, 0, 0, 0, 2, 2, 0, 0, 0, 3, 0, 0, 0, 2, 2, 0, 0, 4, 2, 2, 0, 2, 0, 3, 0, 3, 0, 0, 0, 2, 0, 0, 2, 6, 0, 0, 0, 2, 0, 0, 0, 3, 2, 0, 0, 2, 2, 0, 0, 0, 4, 4, 0, 0, 2, 0, 0

Offset: 1

Matthew Vandermast, Jun 03 2012

Length of row n equals A056170(n) if A056170(n) is positive, or 1 if A056170(n) = 0.
The multiset of exponents >=2 in the prime factorization of n completely determines a(n) for over 20 sequences in the database (see crossreferences). It also determines the fractions A034444(n)/A000005(n) and A037445(n)/A000005(n).
For squarefree numbers, this multiset is { } (the empty multiset). The use of 0 in the table to represent each n with no exponents >=2 in its prime factorization accords with the usual OEIS practice of using 0 to represent nonexistent elements when possible. In comments, the second signature of squarefree numbers will be represented as { }.
For each second signature {S}, there exist values of j and k such that, if the second signature of n is {S}, then A085082(n) is congruent to j modulo k.  These values are nontrivial unless {S} = { }. Analogous (but not necessarily identical) values of j and k also exist for each second signature with respect to A088873 and A181796.
Each sequence of integers with a given second signature {S} has a positive density, unlike the analogous sequences for prime signatures. The highest of these densities is 6/Pi^2 = 0.607927... for A005117 ({S} = { }).

			First rows of table read: 0; 0; 0; 2; 0; 0; 0; 3; 2; 0; 0; 2;...
12 = 2^2*3 has positive exponents 2 and 1 in its canonical prime factorization (1s are often left implicit as exponents). Since only exponents that are 2 or greater appear in a number's second signature, 12's second signature is {2}.
30 = 2*3*5 has no exponents greater than 1 in its prime factorization. The multiset of its exponents >= 2 is { } (the empty multiset), represented in the table with a 0.
72 = 2^3*3^2 has positive exponents 3 and 2 in its prime factorization, as does 108 = 2^2*3^3. Rows 72 and 108 both read {3,2}.

Jason Kimberley, Table of i, a(i) for i = 1..10575 (n = 1..10000)
M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 [alternative scanned copy].
Primefan, The First 2500 Integers Factored (1st of 5 pages)

A181800 gives first integer of each second signature. Also see A212171, A212173-A212181, A212642-A212644.
Functions determined by exponents >=2 in the prime factorization of n:
Multiplicative: A000688, A005361, A008966, A038538, A046951, A049419, A050361, A050377, A056624, A061704, A063775, A162510, A162511, A212181.
Additive: A046660, A056170.
Other: A007424, A051903 (for n > 1), A056626, A066301, A071325, A072411, A091050, A107078, A185102 (for n > 1), A212180.
Sequences that contain all integers of a specific second signature: A005117 (second signature { }), A060687 ({2}), A048109 ({3}).

&cat[IsEmpty(e)select [0]else Reverse(Sort(e))where e is[pe[2]:pe in Factorisation(n)|pe[2]gt 1]:n in[1..102]]; // Jason Kimberley, Jun 13 2012

row[n_] := Select[ FactorInteger[n][[All, 2]], # >= 2 &] /. {} -> 0 /. {k__} -> Sequence[k]; Table[row[n], {n, 1, 100}] (* Jean-François Alcover, Apr 16 2013 *)

For nonsquarefree n, row n is identical to row A057521(n) of table A212171.

A238747 Row n of table gives prime metasignature of n: count total appearances of each distinct integer that appears in the prime signature of n, then arrange totals in nonincreasing order.

Original entry on oeis.org

1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 3, 1, 1, 2, 2, 2, 2, 1, 2, 2, 1, 1, 1, 3, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 2, 1, 1, 2, 2, 1, 2, 1, 1, 2, 1, 1, 1, 2, 3, 1, 1, 1, 2, 3, 1, 1

Offset: 2

Matthew Vandermast, May 08 2014

A prime metasignature is analogous to the signature of a partition (cf. A115621); it is the signature of a prime signature.

Row n also gives prime signature of A181819(n).

			The prime signature of 72 (2^3*3^2) is {3,2}. The numbers 3 and 2 each appear once; therefore, the prime metasignature of 72 is {1,1}.
The prime signature of 120 (2^3*3*5) is {3,1,1}. 3 appears 1 time and 1 appears 2 times; therefore, the prime metasignature of 120 is {2,1}.

Length of row n equals A071625(n); sum of numbers in row n is A001221(n).

Cf. A115621, A181819, A238748.

Row n is identical to row A181819(n) of table A212171.

A212176 Row n of table lists exponents in canonical prime factorization of A181800(n) (n-th powerful number that is the first integer of its prime signature), in nonincreasing order.

Original entry on oeis.org

2, 3, 4, 5, 2, 2, 6, 3, 2, 7, 4, 2, 3, 3, 8, 5, 2, 4, 3, 9, 6, 2, 5, 3, 2, 2, 2, 10, 7, 2, 4, 4, 6, 3, 3, 2, 2, 11, 8, 2, 5, 4, 7, 3, 4, 2, 2, 12, 9, 2, 6, 4, 3, 3, 2, 8, 3, 5, 2, 2, 5, 5, 13, 10, 2, 7, 4, 4, 3, 2, 9, 3, 6, 2, 2, 6, 5, 14, 11, 2, 8, 4, 5, 3, 2, 3

Offset: 2

Matthew Vandermast, Jun 03 2012

A212179(n) gives length of row n.

Table represents prime signature (cf. A212171) and second signature (cf. A212172) of A181800.

			Since 72 is a member of A181800, all positive exponents in its prime factorization (2^3*3^2) equal or exceed 2. Therefore, its second signature is the same as its prime signature, namely, {3,2} (nonincreasing version).  Since 72 = A181800 (8), row 8 represents the prime signature and second signature {3,2}.

Will Nicholes, Prime Signatures

Cf. A181800, A212171, A212172, A212179.

Row n is identical to row A181800(n) of tables A212171 and A212172.

A212642 a(n) = number of distinct prime signatures represented among divisors of A181800(n) (n-th powerful number that is the first integer of its prime signature).

Original entry on oeis.org

1, 3, 4, 5, 6, 6, 7, 9, 8, 12, 10, 9, 15, 14, 10, 18, 18, 10, 11, 21, 15, 22, 16, 12, 24, 20, 26, 22, 13, 27, 25, 19, 30, 28, 21, 14, 30, 30, 28, 34, 34, 27, 15, 33, 35, 37, 20, 38, 40, 33, 31, 16, 36, 40, 46, 15, 28, 30, 42, 46, 39, 43, 17, 39, 45, 55, 25, 35

Offset: 1

Matthew Vandermast, Jun 05 2012

nonn

Also, number of divisors of A181800 that are members of A025487.

Consider a member of A181800 with second signature {S} whose divisors represent a total of k distinct second signatures and a total of (j+k) distinct prime signatures. Let n be any integer with second signature {S}. Then A212180(n) = k and A085082(n) is congruent to j modulo k. Cf. A212643, A212644.

			The divisors of 36 represent a total of 6 distinct prime signatures (cf. A085082), as can be seen from the positive exponents, if any, in the canonical prime factorization of each divisor:
{ }: 1 (multiset of positive exponents is the empty multiset)
{1}: 2 (2^1), 3 (3^1)
{1,1}: 6 (2^1*3^1)
{2}: 4 (2^2), 9 (3^2),
{2,1}: 12 (2^2*3^1), 18 (2^1*3^2)
{2,2}: 36 (2^2*3^2)
Since 36 = A181800(6), a(6) = 6.

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

Cf. A181800, A085082, A212171, A212172, A212643, A212644.

a(n) = A085082(A181800(n)).

A238744 Irregular table read by rows: T (n, k) gives the number of primes p such that p^k divides n; table omits all zero values.

Original entry on oeis.org

1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 2, 1, 1, 2, 2, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 2, 2, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 3, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 1, 2, 2, 2, 1, 1, 1, 3, 1, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 1, 2, 1, 2, 2, 1, 1, 2, 1, 1, 2

Offset: 2

Matthew Vandermast, Apr 28 2014

If the prime signature of n (nonincreasing version) is viewed as a partition, row n gives the conjugate partition.

			24 = 2^3*3 is divisible by two prime numbers (2 and 3), one square of a prime (4 = 2^2), and one cube of a prime (8 = 2^3); therefore, row 24 of the table is {2,1,1}.
From _Gus Wiseman_, Mar 31 2022: (Start)
Rows begin:
     1: ()        16: (1,1,1,1)    31: (1)
     2: (1)       17: (1)          32: (1,1,1,1,1)
     3: (1)       18: (2,1)        33: (2)
     4: (1,1)     19: (1)          34: (2)
     5: (1)       20: (2,1)        35: (2)
     6: (2)       21: (2)          36: (2,2)
     7: (1)       22: (2)          37: (1)
     8: (1,1,1)   23: (1)          38: (2)
     9: (1,1)     24: (2,1,1)      39: (2)
    10: (2)       25: (1,1)        40: (2,1,1)
    11: (1)       26: (2)          41: (1)
    12: (2,1)     27: (1,1,1)      42: (3)
    13: (1)       28: (2,1)        43: (1)
    14: (2)       29: (1)          44: (2,1)
    15: (2)       30: (3)          45: (2,1)
(End)

Row lengths are A051903(n); row sums are A001222(n).
Cf. A217171.
These partitions are ranked by A238745.
For prime indices A296150 instead of exponents we get A321649, rev A321650.
A000700 counts self-conjugate partitions, ranked by A088902.
A003963 gives product of prime indices, conjugate A329382.
A008480 gives number of permutations of prime indices, conjugate A321648.
A056239 adds up prime indices, row sums of A112798.
A124010 gives prime signature, sorted A118914, length A001221.
A352486-A352490 are sets related to the fixed points of A122111.
Cf. A000701, A000720, A046682, A238747, A258116, A319005, A330644, A352491.

Table[Length/@Table[Select[Last/@FactorInteger[n],#>=k&],{k,Max@@Last/@FactorInteger[n]}],{n,2,100}] (* Gus Wiseman, Mar 31 2022 *)

Row n is identical to row A124859(n) of table A212171.

A365406 Numbers j whose largest divisor <= sqrt(j) is a power of 2.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 10, 11, 13, 14, 16, 17, 19, 20, 22, 23, 24, 26, 28, 29, 31, 32, 34, 37, 38, 41, 43, 44, 46, 47, 52, 53, 58, 59, 61, 62, 64, 67, 68, 71, 72, 73, 74, 76, 79, 80, 82, 83, 86, 88, 89, 92, 94, 96, 97, 101, 103, 104, 106, 107, 109, 112, 113, 116, 118, 122, 124, 127, 128, 131, 134, 136, 137

Offset: 1

Omar E. Pol, Oct 10 2023

nonn

Also indices of the powers of 2 in A033676.
Also numbers in increasing order from the columns k of A163280 where k is a power of 2.
Observation: at least the first 82 terms of the subsequence of terms with no middle divisors (that is 3, 5, 7, 10, ...) coincide with at least the first 82 terms of A246955.
For the definition of middle divisor see A067742.
From Peter Munn, Oct 26 2023: (Start)
Most of the early terms are in A342081, which consists of powers of 2 together with products of a prime and a power of 2 where the prime is the larger. The exceptions are 24, 72, 80, 96, 112, ... .
The odd terms clearly consist of 1 and the odd primes. We can fully characterize the even terms by their A290110 values, which depend on the relative sizes of a number's divisors. A290110 provides a refinement of the classification of numbers by prime signature (cf. A212171): see the example below for numbers with the same prime signature as 48.
(End)

			From _Peter Munn_, Oct 26 2023: (Start)
The table below looks at numbers j with prime signature (4, 1), showing the presence of j and its characterization by A290110(j):
    j             A290110(j)  present
    48 = 2^4 * 3      16         no
    80 = 2^4 * 5      21        yes
   112 = 2^4 * 7      21        yes
   162 = 2 * 3^4      36         no
   176 = 2^4 * 11     38         no
   208 = 2^4 * 13     38         no
   272 = 2^4 * 17     51        yes
   304 = 2^4 * 19     51        yes
   368 = 2^4 * 23     51        yes
  ...
Clearly any odd composite number is exempted, for example:
   891 = 3^4 * 11     21         no
  6723 = 3^4 * 83     51         no
Note that A290110(j) = 36 for j = 2 * p^4, prime p; and A290110(j) = 51 for j = 2^4 * p, prime p >= 17.
(End)

David A. Corneth, Table of n, a(n) for n = 1..10000

Cf. A342081 (a subsequence), A365408 (complement), A365716 (characteristic function).

Cf. A033676, A067742, A071561, A163280, A212171, A246955, A290110.

q[n_] := Module[{d = Divisors[n], mid}, mid = d[[Ceiling[Length[d]/2]]]; mid == 2^IntegerExponent[mid, 2]]; Select[Range[150], q] (* Amiram Eldar, Oct 11 2023 *)

f(n) = local(d); if(n<2, 1, d=divisors(n); d[(length(d)+1)\2]); \\ A033676
isp2(n) = 2^logint(n,2) == n;
isok(k) = isp2(f(k)); \\ Michel Marcus, Oct 11 2023

from itertools import count, islice
from sympy import divisors
def A365406_gen(startvalue=1): # generator of terms >= startvalue
    return filter(lambda i:(a:=(d:=divisors(i))[len(d)-1>>1])==1<A365406_list = list(islice(A365406_gen(),30)) # Chai Wah Wu, Oct 18 2023

A212182 Irregular triangle read by rows T(n,k): T(1,1) = 0; for n > 1, row n lists exponents of distinct prime factors of the n-th highly composite number (A002182(n)), where column k = 1, 2, 3, ..., omega(A002182(n)) = A108602(n).

Original entry on oeis.org

0, 1, 2, 1, 1, 2, 1, 3, 1, 2, 2, 4, 1, 2, 1, 1, 3, 1, 1, 2, 2, 1, 4, 1, 1, 3, 2, 1, 4, 2, 1, 3, 1, 1, 1, 2, 2, 1, 1, 4, 1, 1, 1, 3, 2, 1, 1, 4, 2, 1, 1, 3, 3, 1, 1, 5, 2, 1, 1, 4, 3, 1, 1, 6, 2, 1, 1, 4, 2, 2, 1, 3, 2, 1, 1, 1, 4, 4, 1, 1, 5, 2, 2, 1, 4, 2, 1

Offset: 1

Matthew Vandermast, Jun 08 2012

Length of row n = A108602(n).
For n > 1, row n of table gives the "nonincreasing order" version of the prime signature of A002182(n) (cf. A212171). This order is also the natural order of the exponents in the prime factorization of any highly composite number.
The distinct prime factors corresponding to exponents in row n are given by A318490(n, k), where k = 1, 2, 3, ..., A108602(n).

			First rows read:
  0;
  1;
  2;
  1, 1;
  2, 1;
  3, 1;
  2, 2;
  4, 1;
  2, 1, 1;
  3, 1, 1;
  2, 2, 1;
  4, 1, 1;
  ...
1st row: A002182(1) = 1 so T(1, 1) = 0;
2nd row: A002182(2) = 2^1 so T(2, 1) = 1;
3rd row: A002182(3) = 4 = 2^2 so T(3, 1) = 2;
4th row: A002182(4) = 6 = 2^1 * 3^1 so T(4, 1) = 1 and T(4, 2) = 1;
5th row: A002182(5) = 12 = 2^2 * 3^1 so T(5, 1) = 2 and T(5, 2) = 1;
6th row: A002182(6) = 24 = 2^3 * 3^1 so T(6, 1) = 3 and T(6, 2) = 1.

S. Ramanujan, Highly composite numbers, Proc. Lond. Math. Soc. 14 (1915), 347-409; reprinted in Collected Papers, Ed. G. H. Hardy et al., Cambridge 1927; Chelsea, NY, 1962.

Peter J. Marko, Table of i, a(i) for i = 1..10022 (corresponding to first n = 584 rows of irregular triangle; using data from Flammenkamp)
A. Flammenkamp, Highly composite numbers
A. Flammenkamp, List of the first 1200 highly composite numbers
A. Flammenkamp, List of the first 779,674 highly composite numbers
Peter J. Marko, Table of n, T(n, k) by rows for n = 1..10000 (using data from Flammenkamp)
S. Ramanujan, Highly Composite Numbers

Row n has length A108602(n), n >= 2.

Cf. A000040, A002182, A124010, A212171, A318490.

Row n equals row A002182(n) of table A124010. For n > 1, row n equals row A002182(n) of table A212171.

Edited by Peter J. Marko, Aug 30 2018

A212179 Number of distinct prime factors of A181800(n) (n-th powerful number that is the first integer of its prime signature).

Original entry on oeis.org

0, 1, 1, 1, 1, 2, 1, 2, 1, 2, 2, 1, 2, 2, 1, 2, 2, 3, 1, 2, 2, 2, 3, 1, 2, 2, 2, 3, 1, 2, 2, 3, 2, 3, 2, 1, 2, 2, 3, 2, 3, 2, 1, 2, 2, 3, 3, 2, 3, 2, 3, 1, 2, 2, 3, 4, 2, 3, 2, 3, 2, 3, 1, 2, 2, 3, 4, 2, 3, 2, 3, 2, 3, 1, 2, 3, 2, 3, 4, 2, 3, 3, 2, 3, 2, 3, 1, 4

Offset: 1

Matthew Vandermast, Jun 04 2012

nonn

Since each prime factor of A181800(n) divides A181800(n) at least twice, this is also the number of exponents > 2 in prime factorization of A181800(n).

Length of row A181800(n) of table A212171 equals a(n) for n > 1. Row A181800(n) of table A212172 has the same length when n > 1 (length = 1 if n = 1).

			72 (2^3*3^2) has 2 distinct prime factors. Since 72 = A181800(8), a(8) = 2.

Amiram Eldar, Table of n, a(n) for n = 1..10000
Will Nicholes, Prime Signatures

Cf. A181800, A001694, A025487, A212171, A212172, A212176.

a(n) = A001221(A181800(n)) = A056170(A181800(n)).

cp's OEIS Frontend

A124010 Triangle in which first row is 0, n-th row (n>1) lists the exponents of distinct prime factors ("ordered prime signature") in the prime factorization of n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Haskell

Maple

Mathematica

PARI

PARI

Python

Formula

Extensions

A118914 Table of the prime signatures (sorted lists of exponents of distinct prime factors) of the positive integers.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Haskell

Mathematica

PARI

Extensions

A212172 Row n of table represents second signature of n: list of exponents >= 2 in canonical prime factorization of n, in nonincreasing order, or 0 if no such exponent exists.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Magma

Mathematica

Formula

A238747 Row n of table gives prime metasignature of n: count total appearances of each distinct integer that appears in the prime signature of n, then arrange totals in nonincreasing order.

Views

Author

Keywords

Comments

Examples

Crossrefs

Formula

A212176 Row n of table lists exponents in canonical prime factorization of A181800(n) (n-th powerful number that is the first integer of its prime signature), in nonincreasing order.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Formula

A212642 a(n) = number of distinct prime signatures represented among divisors of A181800(n) (n-th powerful number that is the first integer of its prime signature).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Formula

A238744 Irregular table read by rows: T (n, k) gives the number of primes p such that p^k divides n; table omits all zero values.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A365406 Numbers j whose largest divisor <= sqrt(j) is a power of 2.