A330946 -id:A330946 - cp's OEIS frontend

A330944 Number of nonprime prime indices of n.

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

Offset: 1

Gus Wiseman, Jan 13 2020

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.

			24 has prime indices {1,1,1,2}, of which {1,1,1} are nonprime, so a(24) = 3.

The number of prime prime indices is given by A257994.
Primes of prime index are A006450.
Primes of nonprime index are A007821.
Products of primes of prime index are A076610.
Products of primes of nonprime index are A320628.
Numbers whose prime indices are not all prime are A330945.
Cf. A000040, A000720, A001222, A007097, A018252, A056239, A112798, A302242, A320629, A320633, A330946, A330947.

Table[Total[Cases[If[n==1,{},FactorInteger[n]],{p_,k_}/;!PrimeQ[PrimePi[p]]:>k]],{n,30}]

a(n) = my(f=factor(n)); sum(k=1, #f~, if(!isprime(primepi(f[k,1])), f[k,2], 0)); \\ Daniel Suteu, Jan 14 2020

a(n) + A257994(n) = A001222(n).

Additive with a(p^e) = e if primepi(p) is nonprime, and 0 otherwise. - Amiram Eldar, Nov 03 2023

A330945 Numbers whose prime indices are not all prime numbers.

Original entry on oeis.org

2, 4, 6, 7, 8, 10, 12, 13, 14, 16, 18, 19, 20, 21, 22, 23, 24, 26, 28, 29, 30, 32, 34, 35, 36, 37, 38, 39, 40, 42, 43, 44, 46, 47, 48, 49, 50, 52, 53, 54, 56, 57, 58, 60, 61, 62, 63, 64, 65, 66, 68, 69, 70, 71, 72, 73, 74, 76, 77, 78, 79, 80, 82, 84, 86, 87

Offset: 1

Gus Wiseman, Jan 13 2020

nonn

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 sequence of terms together with their prime indices of prime indices begins:
   2: {{}}
   4: {{},{}}
   6: {{},{1}}
   7: {{1,1}}
   8: {{},{},{}}
  10: {{},{2}}
  12: {{},{},{1}}
  13: {{1,2}}
  14: {{},{1,1}}
  16: {{},{},{},{}}
  18: {{},{1},{1}}
  19: {{1,1,1}}
  20: {{},{},{2}}
  21: {{1},{1,1}}
  22: {{},{3}}
  23: {{2,2}}
  24: {{},{},{},{1}}
  26: {{},{1,2}}
  28: {{},{},{1,1}}
  29: {{1,3}}

Complement of A076610 (products of primes of prime index).
Numbers n such that A330944(n) > 0.
The restriction to odd terms is A330946.
The restriction to nonprimes is A330948.
The number of prime prime indices is given by A257994.
The number of nonprime prime indices is given by A330944.
Primes of prime index are A006450.
Primes of nonprime index are A007821.
Products of primes of nonprime index are A320628.
The set S of numbers whose prime indices do not all belong to S is A324694.
Cf. A000040, A000720, A001222, A018252, A056239, A112798, A302242, A320633, A330943, A330947, A330949.

Select[Range[100],!And@@PrimeQ/@PrimePi/@First/@If[#==1,{},FactorInteger[#]]&]

A330948 Nonprime numbers whose prime indices are not all prime numbers.

Original entry on oeis.org

4, 6, 8, 10, 12, 14, 16, 18, 20, 21, 22, 24, 26, 28, 30, 32, 34, 35, 36, 38, 39, 40, 42, 44, 46, 48, 49, 50, 52, 54, 56, 57, 58, 60, 62, 63, 64, 65, 66, 68, 69, 70, 72, 74, 76, 77, 78, 80, 82, 84, 86, 87, 88, 90, 91, 92, 94, 95, 96, 98, 100, 102, 104, 105, 106

Offset: 1

Gus Wiseman, Jan 13 2020

nonn

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 sequence of terms together with their prime indices of prime indices begins:
   4: {{},{}}
   6: {{},{1}}
   8: {{},{},{}}
  10: {{},{2}}
  12: {{},{},{1}}
  14: {{},{1,1}}
  16: {{},{},{},{}}
  18: {{},{1},{1}}
  20: {{},{},{2}}
  21: {{1},{1,1}}
  22: {{},{3}}
  24: {{},{},{},{1}}
  26: {{},{1,2}}
  28: {{},{},{1,1}}
  30: {{},{1},{2}}
  32: {{},{},{},{},{}}
  34: {{},{4}}
  35: {{2},{1,1}}
  36: {{},{},{1},{1}}
  38: {{},{1,1,1}}

Complement in A330945 of A000040.
Complement in A018252 of A076610.
The restriction to odd terms is A330949.
Nonprime numbers n such that A330944(n) > 0.
Taking odds instead of nonprimes gives A330946.
The number of prime prime indices is given by A257994.
Primes of prime index are A006450.
Primes of nonprime index are A007821.
Products of primes of nonprime index are A320628.
The set S of numbers whose prime indices do not all belong to S is A324694.
Cf. A000720, A001222, A056239, A112798, A302242, A320629, A320633, A330943, A330947.

Select[Range[100],!PrimeQ[#]&&!And@@PrimeQ/@PrimePi/@First/@If[#==1,{},FactorInteger[#]]&]

A330947 Nonprime numbers whose prime indices are all prime numbers.

Original entry on oeis.org

1, 9, 15, 25, 27, 33, 45, 51, 55, 75, 81, 85, 93, 99, 121, 123, 125, 135, 153, 155, 165, 177, 187, 201, 205, 225, 243, 249, 255, 275, 279, 289, 295, 297, 327, 335, 341, 363, 369, 375, 381, 405, 415, 425, 451, 459, 465, 471, 495, 527, 531, 537, 545, 561, 573

Offset: 1

Gus Wiseman, Jan 13 2020

nonn

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 sequence of terms together with their prime indices of prime indices begins:
    1: {}
    9: {{1},{1}}
   15: {{1},{2}}
   25: {{2},{2}}
   27: {{1},{1},{1}}
   33: {{1},{3}}
   45: {{1},{1},{2}}
   51: {{1},{4}}
   55: {{2},{3}}
   75: {{1},{2},{2}}
   81: {{1},{1},{1},{1}}
   85: {{2},{4}}
   93: {{1},{5}}
   99: {{1},{1},{3}}
  121: {{3},{3}}
  123: {{1},{6}}
  125: {{2},{2},{2}}
  135: {{1},{1},{1},{2}}
  153: {{1},{1},{4}}
  155: {{2},{5}}

Complement in A076610 of A000040.
Complement in A018252 of A330948.
Nonprime numbers n such that A330944(n) = 0.
Taking odds instead of nonprimes gives A330946.
The number of prime prime indices is given by A257994.
Primes of prime index are A006450.
Primes of nonprime index are A007821.
Products of primes of prime index are A076610.
Products of primes of nonprime index are A320628.
Numbers whose prime indices are not all prime are A330945.
Cf. A000720, A001222, A056239, A112798, A302242, A320629, A320633, A330949.

Select[Range[100],!PrimeQ[#]&&And@@PrimeQ/@PrimePi/@First/@If[#==1,{},FactorInteger[#]]&]

A356064 Numbers with a prime index other than 1 that is not a prime-power. Complement of A302492.

Original entry on oeis.org

13, 26, 29, 37, 39, 43, 47, 52, 58, 61, 65, 71, 73, 74, 78, 79, 86, 87, 89, 91, 94, 101, 104, 107, 111, 113, 116, 117, 122, 129, 130, 137, 139, 141, 142, 143, 145, 146, 148, 149, 151, 156, 158, 163, 167, 169, 172, 173, 174, 178, 181, 182, 183, 185, 188, 193

Offset: 1

Gus Wiseman, Jul 25 2022

nonn

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.

These are numbers divisible by a prime number not of the form prime(q^k) where q is a prime number and k >= 1.

			The terms together with their prime indices begin:
   13: {6}
   26: {1,6}
   29: {10}
   37: {12}
   39: {2,6}
   43: {14}
   47: {15}
   52: {1,1,6}
   58: {1,10}
   61: {18}
   65: {3,6}
   71: {20}
   73: {21}
   74: {1,12}
   78: {1,2,6}
   79: {22}
   86: {1,14}
   87: {2,10}

Heinz numbers of the partitions counted by A023893.
Allowing prime index 1 gives A356066.
A000688 counts factorizations into prime-powers, strict A050361.
A001222 counts prime-power divisors.
A023894 counts partitions into prime-powers, strict A054685.
A034699 gives the maximal prime-power divisor.
A246655 lists the prime-powers (A000961 includes 1), towers A164336.
A355742 chooses a prime-power divisor of each prime index.
A355743 = numbers whose prime indices are prime-powers, squarefree A356065.
Cf. A076610, A085970, A106244, A302492, A302493, A302601, A330946, A354911.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],!And@@PrimePowerQ/@DeleteCases[primeMS[#],1]&]

A330949 Odd nonprime numbers whose prime indices are not all prime numbers.

Original entry on oeis.org

21, 35, 39, 49, 57, 63, 65, 69, 77, 87, 91, 95, 105, 111, 115, 117, 119, 129, 133, 141, 143, 145, 147, 159, 161, 169, 171, 175, 183, 185, 189, 195, 203, 207, 209, 213, 215, 217, 219, 221, 231, 235, 237, 245, 247, 253, 259, 261, 265, 267, 273, 285, 287, 291

Offset: 1

Gus Wiseman, Jan 14 2020

nonn

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.

Also MM-numbers of multiset partitions with at least two parts, not all of which are singletons (see example).

			The sequence of terms together with their prime indices of prime indices begins:
   21: {{1},{1,1}}
   35: {{2},{1,1}}
   39: {{1},{1,2}}
   49: {{1,1},{1,1}}
   57: {{1},{1,1,1}}
   63: {{1},{1},{1,1}}
   65: {{2},{1,2}}
   69: {{1},{2,2}}
   77: {{1,1},{3}}
   87: {{1},{1,3}}
   91: {{1,1},{1,2}}
   95: {{2},{1,1,1}}
  105: {{1},{2},{1,1}}
  111: {{1},{1,1,2}}
  115: {{2},{2,2}}
  117: {{1},{1},{1,2}}
  119: {{1,1},{4}}
  129: {{1},{1,4}}
  133: {{1,1},{1,1,1}}
  141: {{1},{2,3}}

Complement of A106092 in A330945.
Including even numbers gives A330948.
Including primes gives A330946.
The number of prime prime indices is given by A257994.
The number of nonprime prime indices is given by A330944.
Primes of prime index are A006450.
Primes of nonprime index are A007821.
Products of primes of prime index are A076610.
Products of primes of nonprime index are A320628.
The set S of numbers whose prime indices do not all belong to S is A324694.
Cf. A000040, A000720, A001222, A018252, A056239, A112798, A302242, A320629, A320633, A330943, A330947.

Select[Range[1,100,2],!PrimeQ[#]&&!And@@PrimeQ/@PrimePi/@First/@If[#==1,{},FactorInteger[#]]&]

A356066 Numbers with a prime index that is not a prime-power. Complement of A355743.

Original entry on oeis.org

2, 4, 6, 8, 10, 12, 13, 14, 16, 18, 20, 22, 24, 26, 28, 29, 30, 32, 34, 36, 37, 38, 39, 40, 42, 43, 44, 46, 47, 48, 50, 52, 54, 56, 58, 60, 61, 62, 64, 65, 66, 68, 70, 71, 72, 73, 74, 76, 78, 79, 80, 82, 84, 86, 87, 88, 89, 90, 91, 92, 94, 96, 98, 100, 101

Offset: 1

Gus Wiseman, Jul 31 2022

nonn

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 terms together with their prime indices begin:
    2: {1}
    4: {1,1}
    6: {1,2}
    8: {1,1,1}
   10: {1,3}
   12: {1,1,2}
   13: {6}
   14: {1,4}
   16: {1,1,1,1}
   18: {1,2,2}
   20: {1,1,3}
   22: {1,5}
   24: {1,1,1,2}

The complement is A355743, counted by A023894.
The squarefree complement is A356065, counted by A054685.
Allowing prime index 1 gives A356064, complement A302492.
A000688 counts factorizations into prime-powers, strict A050361.
A001222 counts prime-power divisors.
A034699 gives the maximal prime-power divisor.
A246655 lists the prime-powers (A000961 includes 1), towers A164336.
A355742 chooses a prime-power divisor of each prime index.
Cf. A076610, A085970, A106244, A302493, A302601, A330946, A354911.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],!And@@PrimePowerQ/@primeMS[#]&]

Union of A299174 and A356064.

cp's OEIS Frontend

A330944 Number of nonprime prime indices of n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

PARI

Formula

A330945 Numbers whose prime indices are not all prime numbers.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A330948 Nonprime numbers whose prime indices are not all prime numbers.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A330947 Nonprime numbers whose prime indices are all prime numbers.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A356064 Numbers with a prime index other than 1 that is not a prime-power. Complement of A302492.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A330949 Odd nonprime numbers whose prime indices are not all prime numbers.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A356066 Numbers with a prime index that is not a prime-power. Complement of A355743.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula