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.

Previous Showing 11-18 of 18 results.

A371173 Number of integer partitions of n with fewer parts than distinct divisors of parts.

Original entry on oeis.org

0, 0, 1, 1, 1, 3, 2, 4, 6, 7, 11, 11, 17, 20, 26, 34, 44, 56, 67, 84, 102, 131, 156, 195, 232, 283, 346, 411, 506, 598, 721, 855, 1025, 1204, 1448, 1689, 2018, 2363, 2796, 3265, 3840, 4489, 5242, 6104, 7106, 8280, 9595, 11143, 12862, 14926, 17197, 19862, 22841
Offset: 0

Views

Author

Gus Wiseman, Mar 16 2024

Keywords

Comments

The Heinz numbers of these partitions are given by A371168.

Examples

			The partition (4,3,2) has 3 parts {2,3,4} and 4 distinct divisors of parts {1,2,3,4}, so is counted under a(9).
The a(2) = 1 through a(10) = 11 partitions:
  (2)  (3)  (4)  (5)    (6)    (7)    (8)      (9)      (10)
                 (3,2)  (4,2)  (4,3)  (4,4)    (5,4)    (6,4)
                 (4,1)         (5,2)  (5,3)    (6,3)    (7,3)
                               (6,1)  (6,2)    (7,2)    (8,2)
                                      (4,3,1)  (8,1)    (9,1)
                                      (6,1,1)  (4,3,2)  (4,3,3)
                                               (6,2,1)  (5,3,2)
                                                        (5,4,1)
                                                        (6,2,2)
                                                        (6,3,1)
                                                        (8,1,1)
		

Crossrefs

The RHS is represented by A370820.
The version for equality is A371130 (ranks A370802), strict A371128.
For submultisets instead of parts on the LHS we get ranks A371166.
These partitions are ranked by A371168.
The opposite version is A371171, ranks A370348.
A000005 counts divisors.
A355731 counts choices of a divisor of each prime index, firsts A355732.
Choosable partitions: A239312 (A368110), A355740 (A370320), A370592 (A368100), A370593 (A355529).

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],Length[#] < Length[Union@@Divisors/@#]&]],{n,0,30}]

A371127 Powers of 2 times powers > 1 of a prime-indexed prime number.

Original entry on oeis.org

3, 5, 6, 9, 10, 11, 12, 17, 18, 20, 22, 24, 25, 27, 31, 34, 36, 40, 41, 44, 48, 50, 54, 59, 62, 67, 68, 72, 80, 81, 82, 83, 88, 96, 100, 108, 109, 118, 121, 124, 125, 127, 134, 136, 144, 157, 160, 162, 164, 166, 176, 179, 191, 192, 200, 211, 216, 218, 236, 241
Offset: 1

Views

Author

Gus Wiseman, Mar 18 2024

Keywords

Comments

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.

Examples

			The terms together with their prime indices begin:
      3: {2}
      5: {3}
      6: {1,2}
      9: {2,2}
     10: {1,3}
     11: {5}
     12: {1,1,2}
     17: {7}
     18: {1,2,2}
     20: {1,1,3}
     22: {1,5}
     24: {1,1,1,2}
     25: {3,3}
     27: {2,2,2}
     31: {11}
     34: {1,7}
     36: {1,1,2,2}
		

Crossrefs

Subset of A302540.
Subset of A336101 = powers of 2 times powers of primes.
Positions of 2's in A370820.
Counting prime factors instead of divisors gives A371287.
A000005 counts divisors.
A000961 lists powers of primes, A302596 of prime index.
A001221 counts distinct prime factors.
A003963 gives product of prime indices.
A027746 lists prime factors, indices A112798, length A001222.
A076610 lists products of primes of prime index.
A355731 counts choices of a divisor of each prime index, firsts A355732.
A355741 counts choices of a prime factor of each prime index.

Programs

  • Mathematica
    Select[Range[100],Length[Union @@ Divisors/@PrimePi/@First/@If[#==1,{},FactorInteger[#]]]==2&]

A371170 Positive integers with at most as many prime factors (A001222) as distinct divisors of prime indices (A370820).

Original entry on oeis.org

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

Views

Author

Gus Wiseman, Mar 16 2024

Keywords

Comments

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.

Examples

			The prime indices of 105 are {2,3,4}, and there are 3 prime factors (3,5,7) and 4 distinct divisors of prime indices (1,2,3,4), so 105 is in the sequence.
The terms together with their prime indices begin:
     1: {}       22: {1,5}      42: {1,2,4}    63: {2,2,4}
     2: {1}      23: {9}        43: {14}       65: {3,6}
     3: {2}      25: {3,3}      45: {2,2,3}    66: {1,2,5}
     5: {3}      26: {1,6}      46: {1,9}      67: {19}
     6: {1,2}    28: {1,1,4}    47: {15}       69: {2,9}
     7: {4}      29: {10}       49: {4,4}      70: {1,3,4}
     9: {2,2}    30: {1,2,3}    51: {2,7}      71: {20}
    10: {1,3}    31: {11}       52: {1,1,6}    73: {21}
    11: {5}      33: {2,5}      53: {16}       74: {1,12}
    13: {6}      34: {1,7}      55: {3,5}      75: {2,3,3}
    14: {1,4}    35: {3,4}      57: {2,8}      76: {1,1,8}
    15: {2,3}    37: {12}       58: {1,10}     77: {4,5}
    17: {7}      38: {1,8}      59: {17}       78: {1,2,6}
    19: {8}      39: {2,6}      61: {18}       79: {22}
    21: {2,4}    41: {13}       62: {1,11}     82: {1,13}
		

Crossrefs

The complement is A370348, counted by A371171.
The case of equality is A370802, counted by A371130, strict A371128.
The RHS is A370820, for prime factors instead of divisors A303975.
The strict version is A371168 counted by A371173.
The opposite version is A371169.
Choosable partitions: A239312 (A368110), A355740 (A370320), A370592 (A368100), A370593 (A355529).
A000005 counts divisors.
A001221 counts distinct prime factors.
A027746 lists prime factors, indices A112798, length A001222.
A355731 counts choices of a divisor of each prime index, firsts A355732.

Programs

  • Mathematica
    Select[Range[100],PrimeOmega[#]<=Length[Union @@ Divisors/@PrimePi/@First/@If[#==1,{},FactorInteger[#]]]&]

A371169 Positive integers with at least as many prime factors (A001222) as distinct divisors of prime indices (A370820).

Original entry on oeis.org

1, 2, 4, 6, 8, 9, 10, 12, 16, 18, 20, 22, 24, 25, 27, 28, 30, 32, 34, 36, 40, 42, 44, 45, 48, 50, 54, 56, 60, 62, 63, 64, 66, 68, 72, 75, 80, 81, 82, 84, 88, 90, 92, 96, 98, 99, 100, 102, 104, 108, 110, 112, 118, 120, 121, 124, 125, 126, 128, 132, 134, 135
Offset: 1

Views

Author

Gus Wiseman, Mar 16 2024

Keywords

Comments

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.

Examples

			The terms together with their prime indices begin:
     1: {}
     2: {1}
     4: {1,1}
     6: {1,2}
     8: {1,1,1}
     9: {2,2}
    10: {1,3}
    12: {1,1,2}
    16: {1,1,1,1}
    18: {1,2,2}
    20: {1,1,3}
    22: {1,5}
    24: {1,1,1,2}
    25: {3,3}
    27: {2,2,2}
    28: {1,1,4}
    30: {1,2,3}
    32: {1,1,1,1,1}
    34: {1,7}
    36: {1,1,2,2}
		

Crossrefs

The strict version is A370348 counted by A371171.
The case of equality is A370802, counted by A371130, strict A371128.
The RHS is A370820, for prime factors instead of divisors A303975.
The complement is A371168, counted by A371173.
The opposite version is A371170.
The version for prime factors instead of divisors on the RHS is A319899.
Choosable partitions: A239312 (A368110), A355740 (A370320), A370592 (A368100), A370593 (A355529).
A000005 counts divisors.
A001221 counts distinct prime factors.
A027746 lists prime factors, indices A112798, length A001222.
A355731 counts choices of a divisor of each prime index, firsts A355732.

Programs

  • Mathematica
    Select[Range[100],PrimeOmega[#]>=Length[Union @@ Divisors/@PrimePi/@First/@If[#==1,{},FactorInteger[#]]]&]

A371166 Positive integers with fewer divisors (A000005) than distinct divisors of prime indices (A370820).

Original entry on oeis.org

7, 13, 19, 23, 29, 37, 43, 47, 53, 61, 71, 73, 74, 79, 89, 91, 95, 97, 101, 103, 106, 107, 111, 113, 122, 131, 137, 139, 141, 142, 143, 145, 149, 151, 159, 161, 163, 167, 169, 173, 178, 181, 183, 185, 193, 197, 199, 203, 209, 213, 214, 215, 219, 221, 223, 226
Offset: 1

Views

Author

Gus Wiseman, Mar 14 2024

Keywords

Comments

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.

Examples

			The terms together with their prime indices begin:
     7: {4}       101: {26}      163: {38}      223: {48}
    13: {6}       103: {27}      167: {39}      226: {1,30}
    19: {8}       106: {1,16}    169: {6,6}     227: {49}
    23: {9}       107: {28}      173: {40}      229: {50}
    29: {10}      111: {2,12}    178: {1,24}    233: {51}
    37: {12}      113: {30}      181: {42}      239: {52}
    43: {14}      122: {1,18}    183: {2,18}    247: {6,8}
    47: {15}      131: {32}      185: {3,12}    251: {54}
    53: {16}      137: {33}      193: {44}      257: {55}
    61: {18}      139: {34}      197: {45}      259: {4,12}
    71: {20}      141: {2,15}    199: {46}      262: {1,32}
    73: {21}      142: {1,20}    203: {4,10}    263: {56}
    74: {1,12}    143: {5,6}     209: {5,8}     265: {3,16}
    79: {22}      145: {3,10}    213: {2,20}    267: {2,24}
    89: {24}      149: {35}      214: {1,28}    269: {57}
    91: {4,6}     151: {36}      215: {3,14}    271: {58}
    95: {3,8}     159: {2,16}    219: {2,21}    281: {60}
    97: {25}      161: {4,9}     221: {6,7}     293: {62}
		

Crossrefs

The RHS is A370820, for prime factors instead of divisors A303975.
For (equal to) instead of (less than) we have A371165, counted by A371172.
For (greater than) instead of (less than) we have A371167.
For prime factors on the LHS we get A371168, counted by A371173.
Other equalities: A319899, A370802 (A371130), A371128, A371177 (A371178).
Other inequalities: A370348 (A371171), A371169, A371170.
A000005 counts divisors.
A001221 counts distinct prime factors.
A027746 lists prime factors, A112798 indices, length A001222.
A239312 counts divisor-choosable partitions, ranks A368110.
A355731 counts choices of a divisor of each prime index, firsts A355732.
A370320 counts non-divisor-choosable partitions, ranks A355740.
A370814 counts divisor-choosable factorizations, complement A370813.

Programs

  • Mathematica
    Select[Range[100],Length[Divisors[#]] < Length[Union@@Divisors/@PrimePi/@First/@FactorInteger[#]]&]

Formula

A000005(a(n)) < A370820(a(n)).

A371131 Least number with exactly n distinct divisors of prime indices. Position of first appearance of n in A370820.

Original entry on oeis.org

1, 2, 3, 7, 13, 53, 37, 311, 89, 151, 223, 2045, 281, 3241, 1163, 827, 659, 9037, 1069, 17611, 1511, 4211, 28181, 122119, 2423, 10627, 88483, 6997, 7561, 98965, 5443, 88099, 6473, 95603, 309073, 50543, 10271, 192709, 508051, 438979, 14323, 305107, 26203
Offset: 0

Views

Author

Gus Wiseman, Mar 20 2024

Keywords

Comments

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.
Every nonnegative integer belongs to A370820, so this sequence is infinite.
Are there any terms with more than two prime factors?

Examples

			The terms together with their prime indices begin:
       1: {}
       2: {1}
       3: {2}
       7: {4}
      13: {6}
      53: {16}
      37: {12}
     311: {64}
      89: {24}
     151: {36}
     223: {48}
    2045: {3,80}
     281: {60}
    3241: {4,90}
    1163: {192}
     827: {144}
     659: {120}
    9037: {4,210}
    1069: {180}
   17611: {5,252}
		

Crossrefs

Counting prime factors instead of divisors (see A303975) gives A062447(>0).
The sorted version is A371181.
A000005 counts divisors.
A001221 counts distinct prime factors.
A003963 gives product of prime indices.
A027746 lists prime factors, A112798 indices, length A001222.
A355731 counts choices of a divisor of each prime index, firsts A355732.
A355741 counts choices of a prime factor of each prime index.

Programs

  • Mathematica
    rnnm[q_]:=Max@@Select[Range[Min@@q,Max@@q],SubsetQ[q,Range[#]]&];
    posfirsts[q_]:=Table[Position[q,n][[1,1]],{n,Min@@q,rnnm[q]}];
    posfirsts[Table[Length[Union @@ Divisors/@PrimePi/@First/@If[n==1, {},FactorInteger[n]]],{n,1000}]]
  • PARI
    f(n) = my(list=List(), f=factor(n)); for (i=1, #f~, fordiv(primepi(f[i,1]), d, listput(list, d))); #Set(list); \\ A370820
    a(n) = my(k=1); while (f(k) != n, k++); k; \\ Michel Marcus, May 02 2024

A371167 Positive integers with more divisors (A000005) than distinct divisors of prime indices (A370820).

Original entry on oeis.org

1, 2, 4, 6, 8, 9, 10, 12, 14, 15, 16, 18, 20, 21, 22, 24, 25, 27, 28, 30, 32, 33, 34, 36, 40, 42, 44, 45, 46, 48, 50, 51, 52, 54, 55, 56, 60, 62, 63, 64, 66, 68, 70, 72, 75, 76, 78, 80, 81, 82, 84, 85, 88, 90, 92, 93, 96, 98, 99, 100, 102, 104, 105, 108, 110
Offset: 1

Views

Author

Gus Wiseman, Mar 14 2024

Keywords

Comments

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.

Examples

			The prime indices of 814 are {1,5,12}, and there are 8 divisors (1,2,11,22,37,74,407,814) and 7 distinct divisors of prime indices (1,2,3,4,5,6,12), so 814 is in the sequence.
The prime indices of 1859 are {5,6,6}, and there are 6 divisors (1,11,13,143,169,1859) and 5 distinct divisors of prime indices (1,2,3,5,6), so 1859 is in the sequence.
The terms together with their prime indices begin:
     1: {}
     2: {1}
     4: {1,1}
     6: {1,2}
     8: {1,1,1}
     9: {2,2}
    10: {1,3}
    12: {1,1,2}
    14: {1,4}
    15: {2,3}
    16: {1,1,1,1}
    18: {1,2,2}
    20: {1,1,3}
    21: {2,4}
    22: {1,5}
    24: {1,1,1,2}
    25: {3,3}
    27: {2,2,2}
    28: {1,1,4}
    30: {1,2,3}
		

Crossrefs

For prime factors on the LHS we have A370348, counted by A371171.
The RHS is A370820, for prime factors instead of divisors A303975.
For (equal to) instead of (greater than) we get A371165, counted by A371172.
For (less than) instead of (greater than) we get A371166.
Other equalities: A319899, A370802 (A371130), A371128, A371177 (A371178).
Other inequalities: A371168 (A371173), A371169, A371170.
A000005 counts divisors.
A001221 counts distinct prime factors.
A027746 lists prime factors, A112798 indices, length A001222.
A239312 counts divisor-choosable partitions, ranks A368110.
A355731 counts choices of a divisor of each prime index, firsts A355732.
A370320 counts non-divisor-choosable partitions, ranks A355740.
A370814 counts divisor-choosable factorizations, complement A370813.

Programs

  • Mathematica
    Select[Range[100],Length[Divisors[#]]>Length[Union @@ Divisors/@PrimePi/@First/@If[#==1,{},FactorInteger[#]]]&]

Formula

A000005(a(n)) > A370820(a(n)).

A371181 Sorted list of positions of first appearances in the sequence A370820, which counts distinct divisors of prime indices.

Original entry on oeis.org

1, 2, 3, 7, 13, 37, 53, 89, 151, 223, 281, 311, 659, 827, 1069, 1163, 1511, 2045, 2423, 3241, 4211, 5443, 6473, 6997, 7561, 9037, 10271, 10627, 14323, 17611, 26203, 28181, 33613, 50543, 88099, 88483, 95603, 98965, 122119, 168281, 192709, 305107, 309073, 420167
Offset: 1

Views

Author

Gus Wiseman, Mar 20 2024

Keywords

Comments

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.

Examples

			The terms together with their prime indices begin:
       1: {}
       2: {1}
       3: {2}
       7: {4}
      13: {6}
      37: {12}
      53: {16}
      89: {24}
     151: {36}
     223: {48}
     281: {60}
     311: {64}
     659: {120}
     827: {144}
    1069: {180}
    1163: {192}
    1511: {240}
    2045: {3,80}
    2423: {360}
    3241: {4,90}
    4211: {576}
    5443: {720}
    6473: {840}
    6997: {900}
    7561: {960}
    9037: {4,210}
		

Crossrefs

Counting prime factors instead of divisors (see A303975) gives A062447(>0).
The unsorted version is A371131.
A000005 counts divisors.
A001221 counts distinct prime factors.
A003963 gives product of prime indices.
A027746 lists prime factors, A112798 indices, length A001222.
A355731 counts choices of a divisor of each prime index, firsts A355732.
A355741 counts choices of a prime factor of each prime index.

Programs

  • Mathematica
    rnnm[q_]:=Max@@Select[Range[Min@@q,Max@@q],SubsetQ[q,Range[#]]&];
    posfirsts[q_]:=Table[Position[q,n][[1,1]],{n,Min@@q,rnnm[q]}];
    posfirsts[Table[Length[Union @@ Divisors/@PrimePi/@First/@If[n==1,{},FactorInteger[n]]],{n,1000}]]//Sort
Previous Showing 11-18 of 18 results.