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-15 of 15 results.

A325795 Numbers with more divisors than the sum of their prime indices.

Original entry on oeis.org

1, 2, 4, 6, 8, 12, 16, 18, 20, 24, 30, 32, 36, 40, 42, 48, 54, 56, 60, 64, 72, 80, 84, 90, 96, 100, 108, 112, 120, 126, 128, 132, 140, 144, 150, 156, 160, 162, 168, 176, 180, 192, 198, 200, 204, 210, 216, 220, 224, 234, 240, 252, 256, 260, 264, 270, 280, 288
Offset: 1

Views

Author

Gus Wiseman, May 23 2019

Keywords

Comments

First differs from A325781 in having 156.
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, with sum A056239(n).

Examples

			The sequence of terms together with their prime indices begins:
    1: {}
    2: {1}
    4: {1,1}
    6: {1,2}
    8: {1,1,1}
   12: {1,1,2}
   16: {1,1,1,1}
   18: {1,2,2}
   20: {1,1,3}
   24: {1,1,1,2}
   30: {1,2,3}
   32: {1,1,1,1,1}
   36: {1,1,2,2}
   40: {1,1,1,3}
   42: {1,2,4}
   48: {1,1,1,1,2}
   54: {1,2,2,2}
   56: {1,1,1,4}
   60: {1,1,2,3}
   64: {1,1,1,1,1,1}

Crossrefs

Positions of positive terms in A325794.
Heinz numbers of the partitions counted by A325831.
Cf. A000005, A002033, A056239, A112798, A299702.
Cf. A325694, A325780, A325781, A325792, A325793, A325796, A325797, A325798.

Programs

  • Mathematica
    Select[Range[100],DivisorSigma[0,#]>Total[Cases[FactorInteger[#],{p_,k_}:>PrimePi[p]*k]]&]

A325796 Numbers with at least as many divisors as the sum of their prime indices.

Original entry on oeis.org

1, 2, 3, 4, 6, 8, 10, 12, 16, 18, 20, 24, 28, 30, 32, 36, 40, 42, 48, 54, 56, 60, 64, 66, 70, 72, 80, 84, 88, 90, 96, 100, 108, 112, 120, 126, 128, 132, 140, 144, 150, 156, 160, 162, 168, 176, 180, 192, 198, 200, 204, 208, 210, 216, 220, 224, 228, 234, 240
Offset: 1

Views

Author

Gus Wiseman, May 23 2019

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, with sum A056239(n).

Examples

			The sequence of terms together with their prime indices begins:
    1: {}
    2: {1}
    3: {2}
    4: {1,1}
    6: {1,2}
    8: {1,1,1}
   10: {1,3}
   12: {1,1,2}
   16: {1,1,1,1}
   18: {1,2,2}
   20: {1,1,3}
   24: {1,1,1,2}
   28: {1,1,4}
   30: {1,2,3}
   32: {1,1,1,1,1}
   36: {1,1,2,2}
   40: {1,1,1,3}
   42: {1,2,4}
   48: {1,1,1,1,2}
   54: {1,2,2,2}

Crossrefs

Positions of nonnegative terms in A325794.
Heinz numbers of the partitions counted by A325832.
Cf. A000005, A002033, A056239, A112798, A299702.
Cf. A325694, A325780, A325781, A325792, A325793, A325795, A325797, A325798.

Programs

  • Mathematica
    Select[Range[100],DivisorSigma[0,#]>=Total[Cases[FactorInteger[#],{p_,k_}:>PrimePi[p]*k]]&]

A325797 Numbers with fewer divisors than the sum of their prime indices.

Original entry on oeis.org

5, 7, 9, 11, 13, 14, 15, 17, 19, 21, 22, 23, 25, 26, 27, 29, 31, 33, 34, 35, 37, 38, 39, 41, 43, 44, 45, 46, 47, 49, 50, 51, 52, 53, 55, 57, 58, 59, 61, 62, 63, 65, 67, 68, 69, 71, 73, 74, 75, 76, 77, 78, 79, 81, 82, 83, 85, 86, 87, 89, 91, 92, 93, 94, 95, 97
Offset: 1

Views

Author

Gus Wiseman, May 23 2019

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, with sum A056239(n).

Examples

			The sequence of terms together with their prime indices begins:
   5: {3}
   7: {4}
   9: {2,2}
  11: {5}
  13: {6}
  14: {1,4}
  15: {2,3}
  17: {7}
  19: {8}
  21: {2,4}
  22: {1,5}
  23: {9}
  25: {3,3}
  26: {1,6}
  27: {2,2,2}
  29: {10}
  31: {11}
  33: {2,5}
  34: {1,7}
  35: {3,4}

Crossrefs

Positions of negative terms in A325794.
Heinz numbers of the partitions counted by A325833.
Cf. A000005, A002033, A056239, A112798, A299702.
Cf. A325694, A325780, A325781, A325792, A325793, A325795, A325796, A325798.

Programs

  • Mathematica
    Select[Range[100],DivisorSigma[0,#]PrimePi[p]*k]]&]

A307699 Numbers k such that there is no integer partition of k with exactly k-1 submultisets.

Original entry on oeis.org

0, 1, 2, 6, 8, 12, 14, 18, 20, 24, 26, 30, 32, 38, 42, 44, 48, 50, 54, 60, 62, 66, 68, 72, 74, 80, 84, 86, 90, 92, 98, 102, 104, 108, 110, 114, 122, 126, 128, 132, 134, 138, 140, 146, 150, 152, 158, 164, 168, 170, 174, 180, 182, 186, 192, 194, 198, 200, 206
Offset: 1

Views

Author

Gus Wiseman, May 30 2019

Keywords

Comments

After a(1) = 0, first differs from A229488 in lacking 56.
The number of submultisets of a partition is the product of its multiplicities, each plus one.
{a(n)-1} contains all odd numbers m = p*q*... such that gcd(p-1, q-1, ...) > 2. In particular, {a(n)-1} contains all powers of all primes > 3. Proof: If g is the greatest common divisor, then all factors of k are congruent to 1 modulo g, and thus all multiplicities of any valid multiset are divisible by g. However, the required sum is congruent to 2 modulo g, and so no such multiset can exist. - Charlie Neder, Jun 06 2019

Examples

			The sequence of positive terms together with their prime indices begins:
   1: {}
   2: {1}
   6: {1,2}
   8: {1,1,1}
  12: {1,1,2}
  14: {1,4}
  18: {1,2,2}
  20: {1,1,3}
  24: {1,1,1,2}
  26: {1,6}
  30: {1,2,3}
  32: {1,1,1,1,1}
  38: {1,8}
  42: {1,2,4}
  44: {1,1,5}
  48: {1,1,1,1,2}
  50: {1,3,3}
  54: {1,2,2,2}
  60: {1,1,2,3}
Partitions realizing the desired number of submultisets for each non-term are:
   3: (3)
   4: (22)
   5: (41)
   7: (511)
   9: (621)
  10: (4411)
  11: (71111)
  13: (9211)
  15: (9111111)
  16: (661111)
  17: (9521)
  19: (94411)
  21: (981111)
  22: (88111111)
  23: (32222222222)
  25: (99421)
  27: (3222222222222)
  28: (994411)
  29: (98222222)

Crossrefs

Positions of zeros in A325836.
Cf. A002033, A088880, A088881, A098859, A108917, A126796, A276024, A325694, A325792, A325798, A325828, A325830, A325833, A325834, A325835.

Programs

  • Mathematica
    Select[Range[50],Function[n,Select[IntegerPartitions[n], Times@@(1+Length/@Split[#])==n-1&]=={}]]

Extensions

More terms from Alois P. Heinz, May 30 2019

A366128 Least non-subset-sum of the multiset of prime indices of n.

Original entry on oeis.org

0, 0, 1, 0, 1, 0, 1, 0, 1, 2, 1, 0, 1, 2, 1, 0, 1, 0, 1, 0, 1, 2, 1, 0, 1, 2, 1, 3, 1, 0, 1, 0, 1, 2, 1, 0, 1, 2, 1, 0, 1, 0, 1, 3, 1, 2, 1, 0, 1, 2, 1, 3, 1, 0, 1, 0, 1, 2, 1, 0, 1, 2, 1, 0, 1, 4, 1, 3, 1, 2, 1, 0, 1, 2, 1, 3, 1, 4, 1, 0, 1, 2, 1, 0, 1, 2, 1
Offset: 1

Views

Author

Gus Wiseman, Oct 06 2023

Keywords

Comments

Least positive integer up to the sum of prime indices of n that is not the sum of prime indices of any divisor of n, or 0 if none exists.
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 3906 are {1,2,2,4,11}, with least non-subset-sum 10, so a(3906) = 10.

Crossrefs

Positions of ones are A005408.
Positions of twos appear to be A091999.
Zeros are A325781, nonzeros A325798.
For greatest instead of least we have A365920 (Frobenius number).
The triangle for this rank statistic is A365921 (partitions with least non-subset-sum k).
A055932 lists numbers whose prime indices cover an initial interval.
A056239 adds up prime indices, row sums of A112798.
A073491 lists numbers with gap-free prime indices.
A238709/A238710 count partitions by least/greatest difference.
A342050/A342051 have prime indices with odd/even least gap.
Cf. A001223, A079068, A257993, A286469, A286470, A339662, A339886.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
nmz[y_]:=Complement[Range[Total[y]],Total/@Subsets[y]];
Table[If[nmz[prix[n]]=={},0,Min@@nmz[prix[n]]],{n,100}]
Previous Showing 11-15 of 15 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.