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.

Showing 1-10 of 28 results. Next

A359912 Numbers whose prime indices do not have integer median.

Original entry on oeis.org

1, 6, 14, 15, 26, 33, 35, 36, 38, 51, 58, 60, 65, 69, 74, 77, 84, 86, 93, 95, 106, 119, 122, 123, 132, 141, 142, 143, 145, 150, 156, 158, 161, 177, 178, 185, 196, 201, 202, 204, 209, 210, 214, 215, 216, 217, 219, 221, 225, 226, 228, 249, 262, 265, 276, 278
Offset: 1

Views

Author

Gus Wiseman, Jan 24 2023

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.
The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

Examples

			The terms together with their prime indices begin:
   1: {}
   6: {1,2}
  14: {1,4}
  15: {2,3}
  26: {1,6}
  33: {2,5}
  35: {3,4}
  36: {1,1,2,2}
  38: {1,8}
  51: {2,7}
  58: {1,10}
  60: {1,1,2,3}

Crossrefs

For prime factors instead of indices we have A072978, complement A359913.
These partitions are counted by A307683.
For mean instead of median: A348551, complement A316413, counted by A349156.
The complement is A359908, counted by A325347.
Positions of odd terms in A360005.
A112798 lists prime indices, length A001222, sum A056239.
A326567/A326568 gives the mean of prime indices, conjugate A326839/A326840.
A359893 and A359901 count partitions by median, odd-length A359902.
Cf. A026424, A051293, A067538, A175352, A175761, A289509, A359890, A359905, A360006, A359907, A360009.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],!IntegerQ[Median[prix[#]]]&]

A349156 Number of integer partitions of n whose mean is not an integer.

Original entry on oeis.org

1, 0, 0, 1, 1, 5, 3, 13, 11, 21, 28, 54, 31, 99, 111, 125, 165, 295, 259, 488, 425, 648, 933, 1253, 943, 1764, 2320, 2629, 2962, 4563, 3897, 6840, 6932, 9187, 11994, 12840, 12682, 21635, 25504, 28892, 28187, 44581, 42896, 63259, 66766, 74463, 104278, 124752
Offset: 0

Views

Author

Gus Wiseman, Nov 14 2021

Keywords

Comments

Equivalently, partitions whose length does not divide their sum.
By conjugation, also the number of integer partitions of n with greatest part not dividing n.

Examples

			The a(3) = 1 through a(8) = 11 partitions:
  (21)  (211)  (32)    (2211)   (43)      (332)
               (41)    (3111)   (52)      (422)
               (221)   (21111)  (61)      (431)
               (311)            (322)     (521)
               (2111)           (331)     (611)
                                (421)     (22211)
                                (511)     (32111)
                                (2221)    (41111)
                                (3211)    (221111)
                                (4111)    (311111)
                                (22111)   (2111111)
                                (31111)
                                (211111)

Crossrefs

Below, "!" means either enumerative or set theoretical complement.
The version for nonempty subsets is !A051293.
The complement is counted by A067538, ranked by A316413.
The geometric version is !A067539, strict !A326625, ranked by !A326623.
The strict case is !A102627.
The version for prime factors is A175352, complement A078175.
The version for distinct prime factors is A176587, complement A078174.
The ordered version (compositions) is !A271654, ranked by !A096199.
The multiplicative version (factorizations) is !A326622, geometric !A326028.
The conjugate is ranked by !A326836.
The conjugate strict version is !A326850.
These partitions are ranked by A348551.
A000041 counts integer partitions.
A326567/A326568 give the mean of prime indices, conjugate A326839/A326840.
A236634 counts unbalanced partitions, complement of A047993.
A327472 counts partitions not containing their mean, complement of A237984.
Cf. A001700, A074761, A098743, A143773, A175397, A175761, A298423, A326027, A326641, A326842, A326849, A327778.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],!IntegerQ[Mean[#]]&]],{n,0,30}]

Formula

a(n > 0) = A000041(n) - A067538(n).

A359890 Numbers whose prime indices do not have the same mean as median.

Original entry on oeis.org

12, 18, 20, 24, 28, 40, 42, 44, 45, 48, 50, 52, 54, 56, 60, 63, 66, 68, 70, 72, 75, 76, 78, 80, 84, 88, 92, 96, 98, 99, 102, 104, 108, 112, 114, 116, 117, 120, 124, 126, 130, 132, 135, 136, 138, 140, 144, 147, 148, 150, 152, 153, 154, 156, 160, 162, 164, 165
Offset: 1

Views

Author

Gus Wiseman, Jan 22 2023

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.
The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

Examples

			The terms together with their prime indices begin:
   12: {1,1,2}
   18: {1,2,2}
   20: {1,1,3}
   24: {1,1,1,2}
   28: {1,1,4}
   40: {1,1,1,3}
   42: {1,2,4}
   44: {1,1,5}
   45: {2,2,3}
   48: {1,1,1,1,2}
For example, the prime indices of 360 are {1,1,1,2,2,3}, with mean 5/3 and median 3/2, so 360 is in the sequence.

Crossrefs

The LHS (mean of prime indices) is A326567/A326568.
The complement is A359889, counted by A240219.
The odd-length case is A359891, complement A359892.
These partitions are counted by A359894.
The strict case is counted by A359898, odd-length A359900.
The RHS (median of prime indices) is A360005/2.
A058398 counts partitions by mean, see also A008284, A327482.
A088529/A088530 gives mean of prime signature A124010.
A112798 lists prime indices, length A001222, sum A056239.
A316413 lists numbers whose prime indices have integer mean.
A359908 lists numbers whose prime indices have integer median.
Cf. A327473, A327476, A348551, A359903, A359911, A359912, A360006-A360009.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[1000],Mean[prix[#]]!=Median[prix[#]]&]

A363943 Mean of the multiset of prime indices of n, rounded down.

Original entry on oeis.org

0, 1, 2, 1, 3, 1, 4, 1, 2, 2, 5, 1, 6, 2, 2, 1, 7, 1, 8, 1, 3, 3, 9, 1, 3, 3, 2, 2, 10, 2, 11, 1, 3, 4, 3, 1, 12, 4, 4, 1, 13, 2, 14, 2, 2, 5, 15, 1, 4, 2, 4, 2, 16, 1, 4, 1, 5, 5, 17, 1, 18, 6, 2, 1, 4, 2, 19, 3, 5, 2, 20, 1, 21, 6, 2, 3, 4, 3, 22, 1, 2, 7
Offset: 1

Views

Author

Gus Wiseman, Jun 29 2023

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.
Extending the terminology introduced at A124943, this is the "low mean" of prime indices.

Examples

			The prime indices of 360 are {1,1,1,2,2,3}, with mean 3/2, so a(360) = 1.

Crossrefs

Positions of first appearances are 1 and A000040.
Before rounding down we had A326567/A326568.
For mode instead of mean we have A363486, high A363487.
For low median instead of mean we have A363941, triangle A124943.
For high median instead of mean we have A363942, triangle A124944.
The high version is A363944, triangle A363946.
The triangle for this statistic (low mean) is A363945.
Positions of 1's are A363949(n) = 2*A344296(n), counted by A025065.
A088529/A088530 gives mean of prime signature A124010.
A112798 lists prime indices, length A001222, sum A056239.
A316413 ranks partitions with integer mean, counted by A067538.
A360005 gives twice the median of prime indices.
A363947 ranks partitions with rounded mean 1, counted by A363948.
Cf. A102627, A327473, A327476, A327482, A348551, A359889, A363727, A363951.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
meandown[y_]:=If[Length[y]==0,0,Floor[Mean[y]]];
Table[meandown[prix[n]],{n,100}]

A360009 Numbers whose prime indices have integer mean and integer median.

Original entry on oeis.org

2, 3, 4, 5, 7, 8, 9, 10, 11, 13, 16, 17, 19, 21, 22, 23, 25, 27, 28, 29, 30, 31, 32, 34, 37, 39, 41, 43, 46, 47, 49, 53, 55, 57, 59, 61, 62, 64, 67, 68, 71, 73, 78, 79, 81, 82, 83, 85, 87, 88, 89, 90, 91, 94, 97, 98, 99, 100, 101, 103, 105, 107, 109, 110, 111
Offset: 1

Views

Author

Gus Wiseman, Jan 24 2023

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.
The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

Examples

			The terms together with their prime indices begin:
    2: {1}
    3: {2}
    4: {1,1}
    5: {3}
    7: {4}
    8: {1,1,1}
    9: {2,2}
   10: {1,3}
   11: {5}
   13: {6}
   16: {1,1,1,1}
   17: {7}
   19: {8}
   21: {2,4}
   22: {1,5}
   23: {9}
   25: {3,3}
   27: {2,2,2}
   28: {1,1,4}

Crossrefs

For just integer mean we have A316413 (counted by A067538).
The mean of prime indices is given by A326567/A326568.
The complement is A348551 \/ A359912 (counted by A349156 and A307683).
These partitions are counted by A359906.
For just integer median we have A359908 (counted by A325347).
The median of prime indices is given by A360005/2.
A058398 counts partitions by mean, see also A008284, A327482.
A112798 lists prime indices, length A001222, sum A056239.
A326622 counts factorizations with integer mean, strict A328966.
A359893 and A359901 count partitions by median, odd-length A359902.
Cf. A026424, A327473, A359889, A359890, A359903, A359905, A360006.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],IntegerQ[Mean[prix[#]]]&&IntegerQ[Median[prix[#]]]&]

Formula

Intersection of A316413 and A359908.

A359903 Numbers whose prime indices and prime signature have the same mean.

Original entry on oeis.org

1, 2, 9, 88, 100, 125, 624, 756, 792, 810, 880, 900, 1312, 2401, 4617, 4624, 6240, 7392, 7560, 7920, 8400, 9261, 9604, 9801, 10648, 12416, 23424, 33984, 37760, 45792, 47488, 60912, 66176, 71552, 73920, 75200, 78720, 83592, 89216, 89984, 91264, 91648, 99456
Offset: 1

Views

Author

Gus Wiseman, Jan 24 2023

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.
A number's prime signature (row n of A124010) is the sequence of positive exponents in its prime factorization.

Examples

			The terms together with their prime indices begin:
      1: {}
      2: {1}
      9: {2,2}
     88: {1,1,1,5}
    100: {1,1,3,3}
    125: {3,3,3}
    624: {1,1,1,1,2,6}
    756: {1,1,2,2,2,4}
    792: {1,1,1,2,2,5}
    810: {1,2,2,2,2,3}
    880: {1,1,1,1,3,5}
    900: {1,1,2,2,3,3}
   1312: {1,1,1,1,1,13}
   2401: {4,4,4,4}
   4617: {2,2,2,2,2,8}
   4624: {1,1,1,1,7,7}
   6240: {1,1,1,1,1,2,3,6}
   7392: {1,1,1,1,1,2,4,5}
   7560: {1,1,1,2,2,2,3,4}
   7920: {1,1,1,1,2,2,3,5}
Example: 810 has prime indices {1,2,2,2,2,3} and prime exponents (1,4,1), both of which have mean 2, so 810 is in the sequence.
Example: 78720 has prime indices {1,1,1,1,1,1,1,2,3,13} and prime exponents (7,1,1,1), both of which have mean 5/2, so 78720 is in the sequence.

Crossrefs

Prime indices are A112798, sum A056239, mean A326567/A326568.
Prime signature is A124010, sum A001222, mean A088529/A088530.
For prime factors instead of indices we have A359904.
Partitions with these Heinz numbers are counted by A360068.
A058398 counts partitions by mean, see also A008284, A327482.
A067340 lists numbers whose prime signature has integer mean.
A316413 lists numbers whose prime indices have integer mean.
A360005 gives median of prime indices (times two).
Cf. A240219, A316313, A326622, A327473, A327476, A348551, A359905, A359908, A360008, A360069.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
prisig[n_]:=If[n==1,{},Last/@FactorInteger[n]];
Select[Range[1000],Mean[prix[#]]==Mean[prisig[#]]&]

A363946 Triangle read by rows where T(n,k) is the number of integer partitions of n with high mean k.

Original entry on oeis.org

1, 0, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 3, 0, 1, 0, 1, 3, 2, 0, 1, 0, 1, 6, 3, 0, 0, 1, 0, 1, 6, 4, 3, 0, 0, 1, 0, 1, 11, 5, 4, 0, 0, 0, 1, 0, 1, 11, 13, 0, 4, 0, 0, 0, 1, 0, 1, 18, 9, 8, 5, 0, 0, 0, 0, 1, 0, 1, 18, 21, 10, 0, 5, 0, 0, 0, 0, 1
Offset: 0

Views

Author

Gus Wiseman, Jun 30 2023

Keywords

Comments

Extending the terminology of A124944, the "high mean" of a multiset is obtained by taking the mean and rounding up.

Examples

			Triangle begins:
  1
  0  1
  0  1  1
  0  1  1  1
  0  1  3  0  1
  0  1  3  2  0  1
  0  1  6  3  0  0  1
  0  1  6  4  3  0  0  1
  0  1 11  5  4  0  0  0  1
  0  1 11 13  0  4  0  0  0  1
  0  1 18  9  8  5  0  0  0  0  1
  0  1 18 21 10  0  5  0  0  0  0  1
  0  1 29 28 12  0  6  0  0  0  0  0  1
  0  1 29 32 18 14  0  6  0  0  0  0  0  1
  0  1 44 43 23 16  0  7  0  0  0  0  0  0  1
  0  1 44 77 27 19  0  0  7  0  0  0  0  0  0  1
Row n = 7 counts the following partitions:
  .  (1111111)  (4111)    (511)  (61)  .  .  (7)
                (3211)    (421)  (52)
                (31111)   (331)  (43)
                (2221)    (322)
                (22111)
                (211111)

Crossrefs

Row sums are A000041.
Column k = 2 is A026905 redoubled, ranks A363950.
For median instead of mean we have triangle A124944, low A124943.
For mode instead of mean we have rank stat A363486, high A363487.
For median instead of mean we have rank statistic A363942, low A363941.
The rank statistic for this triangle is A363944.
The version for low mean is A363945, rank statistic A363943.
For mode instead of mean we have triangle A363953, low A363952.
A008284 counts partitions by length, A058398 by mean.
A051293 counts subsets with integer mean, median A000975.
A067538 counts partitions with integer mean, strict A102627, ranks A316413.
A349156 counts partitions with non-integer mean, ranks A348551.
Cf. A002865, A025065, A237984, A327472, A327482, A344296, A362612, A363723, A363724, A363731, A363948.

Programs

  • Mathematica
    meanup[y_]:=If[Length[y]==0,0,Ceiling[Mean[y]]];
Table[Length[Select[IntegerPartitions[n],meanup[#]==k&]],{n,0,15},{k,0,n}]

A363945 Triangle read by rows where T(n,k) is the number of integer partitions of n with low mean k.

Original entry on oeis.org

1, 0, 1, 0, 1, 1, 0, 2, 0, 1, 0, 2, 2, 0, 1, 0, 4, 2, 0, 0, 1, 0, 4, 3, 3, 0, 0, 1, 0, 7, 4, 3, 0, 0, 0, 1, 0, 7, 10, 0, 4, 0, 0, 0, 1, 0, 12, 6, 7, 4, 0, 0, 0, 0, 1, 0, 12, 16, 8, 0, 5, 0, 0, 0, 0, 1, 0, 19, 21, 10, 0, 5, 0, 0, 0, 0
Offset: 0

Views

Author

Gus Wiseman, Jun 30 2023

Keywords

Comments

Extending the terminology of A124943, the "low mean" of a multiset is its mean rounded down.

Examples

			Triangle begins:
  1
  0  1
  0  1  1
  0  2  0  1
  0  2  2  0  1
  0  4  2  0  0  1
  0  4  3  3  0  0  1
  0  7  4  3  0  0  0  1
  0  7 10  0  4  0  0  0  1
  0 12  6  7  4  0  0  0  0  1
  0 12 16  8  0  5  0  0  0  0  1
  0 19 21 10  0  5  0  0  0  0  0  1
  0 19 24 15 12  0  6  0  0  0  0  0  1
  0 30 32 18 14  0  6  0  0  0  0  0  0  1
  0 30 58 23 16  0  0  7  0  0  0  0  0  0  1
  0 45 47 57  0 19  0  7  0  0  0  0  0  0  0  1
Row k = 8 counts the following partitions:
  .  (41111)     (611)   .  (71)  .  .  .  (8)
     (32111)     (521)      (62)
     (311111)    (5111)     (53)
     (22211)     (431)      (44)
     (221111)    (422)
     (2111111)   (4211)
     (11111111)  (332)
                 (3311)
                 (3221)
                 (2222)

Crossrefs

Row sums are A000041.
Column k = 1 is A025065, ranks A363949.
For median instead of mean we have triangle A124943, high A124944.
Column k = 2 is A363745.
For median instead of mean we have rank statistic A363941, high A363942.
The rank statistic for this triangle is A363943.
The high version is A363946, rank statistic A363944.
For mode instead of mean we have A363952, rank statistic A363486.
For high mode instead of mean we have A363953, rank statistic A363487.
A008284 counts partitions by length, A058398 by mean.
A051293 counts subsets with integer mean, median A000975.
A067538 counts partitions with integer mean, strict A102627, ranks A316413.
A349156 counts partitions with non-integer mean, ranks A348551.
Cf. A002865, A026905, A237984, A327472, A327482, A344296, A362612, A363723, A363724, A363731, A363951.

Programs

  • Mathematica
    meandown[y_]:=If[Length[y]==0,0,Floor[Mean[y]]];
Table[Length[Select[IntegerPartitions[n],meandown[#]==k&]],{n,0,15},{k,0,n}]

A360551 Numbers > 1 whose distinct prime indices have non-integer median.

Original entry on oeis.org

6, 12, 14, 15, 18, 24, 26, 28, 33, 35, 36, 38, 45, 48, 51, 52, 54, 56, 58, 65, 69, 72, 74, 75, 76, 77, 86, 93, 95, 96, 98, 99, 104, 106, 108, 112, 116, 119, 122, 123, 135, 141, 142, 143, 144, 145, 148, 152, 153, 158, 161, 162, 172, 175, 177, 178, 185, 192, 196
Offset: 1

Views

Author

Gus Wiseman, Feb 16 2023

Keywords

Comments

First differs from A325700 in having 330 and lacking 462.
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. Distinct prime indices are listed by A304038.
The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

Examples

			The prime indices of 900 are {1,1,2,2,3,3}, with distinct parts {1,2,3}, with median 2, so 900 is not in the sequence.
The prime indices of 462 are {1,2,4,5}, with distinct parts {1,2,4,5}, with median 3, so 462 is not in the sequence.

Crossrefs

For mean instead of median we have the complement of A326621.
Positions of odd terms in A360457.
The complement (without 1) is A360550, counted by A360686.
- For divisors (A063655) we have A139710, complement A139711.
- For prime indices (A360005) we have A359912, complement A359908.
- For distinct prime indices (A360457) we have A360551 complement A360550.
- For distinct prime factors (A360458) we have A100367, complement A360552.
- For prime factors (A360459) we have A072978, complement A359913.
- For prime multiplicities (A360460) we have A360554, complement A360553.
- For 0-prepended differences (A360555) we have A360557, complement A360556.
A112798 lists prime indices, length A001222, sum A056239.
A304038 lists distinct prime indices, length A001221, sum A066328.
A325347 = partitions w/ integer median, complement A307683, strict A359907.
A326619/A326620 gives mean of distinct prime indices.
A359893 and A359901 count partitions by median, odd-length A359902.
Cf. A000975, A026424, A316413, A348551, A360006, A360009, A360248, A360453.

Programs

  • Mathematica
    Select[Range[2,100],!IntegerQ[Median[PrimePi/@First/@FactorInteger[#]]]&]

A360554 Numbers > 1 whose unordered prime signature has non-integer median.

Original entry on oeis.org

12, 18, 20, 28, 44, 45, 48, 50, 52, 63, 68, 72, 75, 76, 80, 92, 98, 99, 108, 112, 116, 117, 124, 147, 148, 153, 162, 164, 171, 172, 175, 176, 188, 192, 200, 207, 208, 212, 236, 242, 244, 245, 261, 268, 272, 275, 279, 284, 288, 292, 304, 316, 320, 325, 332, 333
Offset: 1

Views

Author

Gus Wiseman, Feb 16 2023

Keywords

Comments

First differs from A187039 in having 2520 and lacking 1 and 12600.
A number's unordered prime signature (row n of A118914) is the multiset of positive exponents in its prime factorization.
The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

Examples

			The unordered prime signature of 2520 is {3,2,1,1}, with median 3/2, so 2520 is in the sequence.
The unordered prime signature of 12600 is {3,2,2,1}, with median 2, so 12600 is not in the sequence.

Crossrefs

A subset of A030231.
For mean instead of median we have A070011.
Positions of odd terms in A360460.
The complement is A360553 (without 1), counted by A360687.
- For divisors (A063655) we have A139710, complement A139711.
- For prime indices (A360005) we have A359912, complement A359908.
- For distinct prime indices (A360457) we have A360551 complement A360550.
- For distinct prime factors (A360458) we have A100367, complement A360552.
- For prime factors (A360459) we have A072978, complement A359913.
- For prime multiplicities (A360460) we have A360554, complement A360553.
- For 0-prepended differences (A360555) we have A360557, complement A360556.
A112798 lists prime indices, length A001222, sum A056239.
A325347 = partitions w/ integer median, complement A307683, strict A359907.
A326619/A326620 gives mean of distinct prime indices.
A359893 and A359901 count partitions by median, odd-length A359902.
Cf. A000975, A026424, A304038, A316413, A326621, A348551, A360006, A360009, A360248, A360453.

Programs

  • Mathematica
    Select[Range[2,100],!IntegerQ[Median[Last/@FactorInteger[#]]]&]
Showing 1-10 of 28 results. Next

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

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