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

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.

Programs

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

A360557 Numbers > 1 whose sorted first differences of 0-prepended prime indices have non-integer median.

Original entry on oeis.org

4, 10, 15, 22, 24, 25, 33, 34, 36, 40, 46, 51, 54, 55, 56, 62, 69, 77, 82, 85, 88, 93, 94, 100, 104, 115, 118, 119, 121, 123, 134, 135, 136, 141, 146, 152, 155, 161, 166, 177, 184, 187, 194, 196, 201, 205, 206, 217, 218, 219, 220, 221, 225, 232, 235, 240, 248
Offset: 1

Views

Author

Gus Wiseman, Feb 17 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 0-prepended prime indices of 1617 are {0,2,4,4,5}, with sorted differences {0,1,2,2}, with median 3/2, so 1617 is in the sequence.
		

Crossrefs

For mean instead of median complement we have A340610, counted by A168659.
For mean instead of median we have A360668, counted by A200727.
Positions of odd terms in A360555.
The complement is A360556 (without 1), counted by A360688.
These partitions are counted by A360691.
- 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.
A287352 lists 0-prepended first differences of prime indices.
A325347 counts partitions with integer median, complement A307683.
A355536 lists first differences of prime indices.
A359893 and A359901 count partitions by median, odd-length A359902.
A360614/A360615 = mean of first differences of 0-prepended prime indices.

Programs

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

A360553 Numbers > 1 whose unordered prime signature has integer median.

Original entry on oeis.org

2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 14, 15, 16, 17, 19, 21, 22, 23, 24, 25, 26, 27, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 46, 47, 49, 51, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 64, 65, 66, 67, 69, 70, 71, 73, 74, 77, 78, 79, 81, 82, 83
Offset: 1

Views

Author

Gus Wiseman, Feb 16 2023

Keywords

Comments

First differs from A067340 in having 60.
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 60 is {1,1,2}, with median 1, so 60 is in the sequence.
The unordered prime signature of 1260 is {1,1,2,2}, with median 3/2, so 1260 is not in the sequence.
		

Crossrefs

For mean instead of median we have A067340, complement A070011.
Positions of even terms in A360460.
The complement is A360554 (without 1).
These partitions are counted by A360687.
- For divisors (A063655) we have A139711, complement A139710.
- For prime indices (A360005) we have A359908, complement A359912.
- For distinct prime indices (A360457) we have A360550, complement A360551.
- For distinct prime factors (A360458) we have A360552, complement A100367.
- For prime factors (A360459) we have A359913, complement A072978.
- For prime multiplicities (A360460) we have A360553, complement A360554.
- For 0-prepended differences (A360555) we have A360556, complement A360557.
A112798 lists prime indices, length A001222, sum A056239.
A124010 lists prime signature.
A325347 = partitions w/ integer median, complement A307683, strict A359907.
A359893 and A359901 count partitions by median, odd-length A359902.
A360454 = numbers whose prime indices and signature have the same median.

Programs

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

A360614 Numerator of the average distance between consecutive 0-prepended prime indices of n; a(1) = 0.

Original entry on oeis.org

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

Views

Author

Gus Wiseman, Feb 19 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.

Examples

			The 0-prepended prime indices of 100 are {0,1,1,3,3}, with differences (1,0,2,0), with mean 3/4, so a(100) = 3.
		

Crossrefs

Positions of 1's are A340609, a superset of A106529.
For twice median instead of mean we have A360555.
The denominator is A360615.
A112798 lists prime indices, length A001222, sum A056239, max A061395.
A124010 gives prime signature, mean A088529/A088530.
A316413 lists numbers with integer mean prime index, complement A348551.
A326567/A326568 gives mean of prime indices.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    Table[If[n==1,0,Numerator[Mean[Differences[Prepend[prix[n],0]]]]],{n,100}]
  • PARI
    A360614(n) = if(1==n,0, my(u=primepi(vecmax(factor(n)[, 1]))); (u/gcd(u, bigomega(n)))); \\ Antti Karttunen, Oct 23 2023

Formula

Numerator of A061395(n)/A001222(n).
a(1) = 0; and for n >= 1, a(n) = A061395(n) / A366785(n) = A061395(n) / gcd(A001222(n), A061395(n)). - Antti Karttunen, Oct 23 2023

Extensions

Data section extended up to a(100) by Antti Karttunen, Oct 23 2023

A360615 Denominator of the average distance between consecutive 0-prepended prime indices of n; a(1) = 0.

Original entry on oeis.org

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

Views

Author

Gus Wiseman, Feb 19 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.

Examples

			The 0-prepended prime indices of 100 are {0,1,1,3,3}, with differences (1,0,2,0), with mean 3/4, so a(100) = 4.
		

Crossrefs

Positions of 1's are A340610
The numerator is A360614.
A112798 lists prime indices, length A001222, sum A056239, max A061395.
A124010 gives prime signature, mean A088529/A088530.
A316413 lists numbers with integer mean prime index, complement A348551.
A326567/A326568 gives mean of prime indices.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    Table[If[n==1,0,Denominator[Mean[Differences[Prepend[prix[n],0]]]]],{n,100}]
  • PARI
    a(n) = if (n==1, 0, my(f=factor(n)); denominator(primepi(vecmax(f[, 1]))/ bigomega(f))); \\ Michel Marcus, Feb 20 2023

Formula

Denominator of A061395(n)/A001222(n), for n>1.

A360688 Number of integer partitions of n with integer median of 0-appended first differences.

Original entry on oeis.org

1, 1, 3, 4, 5, 7, 12, 18, 25, 32, 46, 62, 79, 109, 142, 189, 240, 322, 405, 522, 671, 853, 1053, 1345, 1653, 2081, 2551, 3174, 3878, 4826, 5851, 7219, 8747, 10712, 12936, 15719, 18876, 22872, 27365, 32926, 39253, 47070, 55857, 66676, 79029, 93864, 110832
Offset: 1

Views

Author

Gus Wiseman, Feb 20 2023

Keywords

Comments

Includes all partitions of odd length (A027193).
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 a(1) = 1 through a(8) = 18 partitions:
  (1)  (2)  (3)    (4)     (5)      (6)       (7)        (8)
            (21)   (22)    (41)     (42)      (43)       (44)
            (111)  (211)   (221)    (222)     (61)       (62)
                   (1111)  (311)    (321)     (322)      (332)
                           (11111)  (411)     (331)      (422)
                                    (21111)   (421)      (431)
                                    (111111)  (511)      (521)
                                              (3211)     (611)
                                              (22111)    (2222)
                                              (31111)    (3221)
                                              (211111)   (4211)
                                              (1111111)  (22211)
                                                         (32111)
                                                         (41111)
                                                         (221111)
                                                         (311111)
                                                         (2111111)
                                                         (11111111)
For example, the partition y = (3,2,2,1) has 0-appended parts (3,2,2,1,0), with differences (1,0,1,1), and the multiset {0,1,1,1} has median 1, so y is counted under a(8).
		

Crossrefs

The case of median 0 is A360254, ranks A360558.
These partitions have ranks A360556, complement A360557.
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by number of parts.
A325347 counts partitions w/ integer median, strict A359907, ranks A359908.
A359893 and A359901 count partitions by median, odd-length A359902.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],IntegerQ[Median[Differences[Prepend[Reverse[#],0]]]]&]],{n,30}]

A360552 Numbers > 1 whose distinct prime factors have integer median.

Original entry on oeis.org

2, 3, 4, 5, 7, 8, 9, 11, 13, 15, 16, 17, 19, 21, 23, 25, 27, 29, 30, 31, 32, 33, 35, 37, 39, 41, 42, 43, 45, 47, 49, 51, 53, 55, 57, 59, 60, 61, 63, 64, 65, 66, 67, 69, 70, 71, 73, 75, 77, 78, 79, 81, 83, 84, 85, 87, 89, 90, 91, 93, 95, 97, 99, 101, 102, 103
Offset: 1

Views

Author

Gus Wiseman, Feb 16 2023

Keywords

Comments

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 factors of 900 are {2,2,3,3,5,5}, with distinct parts {2,3,5}, with median 3, so 900 is in the sequence.
		

Crossrefs

For mean instead of median we have A078174, complement of A176587.
The complement is A100367 (without 1).
Positions of even terms in A360458.
- For divisors (A063655) we have A139711, complement A139710.
- For prime indices (A360005) we have A359908, complement A359912.
- For distinct prime indices (A360457) we have A360550, complement A360551.
- For distinct prime factors (A360458) we have A360552, complement A100367.
- For prime factors (A360459) we have A359913, complement A072978.
- For prime multiplicities (A360460) we have A360553, complement A360554.
- For 0-prepended differences (A360555) we have A360556, complement A360557.
A027746 lists prime factors, length A001222, indices A112798.
A027748 lists distinct prime factors, length A001221, indices A304038.
A323171/A323172 = mean of distinct prime factors, indices A326619/A326620.
A325347 = partitions w/ integer median, complement A307683, strict A359907.
A359893 and A359901 count partitions by median, odd-length A359902.

Programs

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

A360681 Numbers for which the prime signature has the same median as the first differences of 0-prepended prime indices.

Original entry on oeis.org

1, 2, 6, 30, 42, 49, 60, 66, 70, 78, 84, 90, 102, 105, 114, 120, 126, 132, 138, 140, 150, 154, 156, 168, 174, 186, 198, 204, 210, 222, 228, 234, 246, 258, 264, 270, 276, 280, 282, 286, 294, 306, 308, 312, 315, 318, 330, 342, 348, 350, 354, 366, 372, 378, 385
Offset: 1

Views

Author

Gus Wiseman, Feb 19 2023

Keywords

Comments

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 terms together with their prime indices begin:
    1: {}
    2: {1}
    6: {1,2}
   30: {1,2,3}
   42: {1,2,4}
   49: {4,4}
   60: {1,1,2,3}
   66: {1,2,5}
   70: {1,3,4}
   78: {1,2,6}
   84: {1,1,2,4}
   90: {1,2,2,3}
For example, the prime indices of 2760 are {1,1,1,2,3,9}. The signature is (3,1,1,1), with median 1. The first differences of 0-prepended prime indices are (1,0,0,1,1,6), with median 1/2. So 2760 is not in the sequence.
		

Crossrefs

For distinct prime indices instead of 0-prepended differences: A360453.
For mean instead of median we have A360680.
A112798 = prime indices, length A001222, sum A056239, mean A326567/A326568.
A124010 gives prime signature, sorted A118914, mean A088529/A088530.
A325347 = partitions w/ integer median, strict A359907, complement A307683.
A359893 and A359901 count partitions by median, odd-length A359902.
Multisets with integer median:
- For divisors (A063655) we have A139711, complement A139710.
- For prime indices (A360005) we have A359908, complement A359912.
- For distinct prime indices (A360457) we have A360550, complement A360551.
- For distinct prime factors (A360458) we have A360552, complement A100367.
- For prime factors (A360459) we have A359913, complement A072978.
- For prime multiplicities (A360460) we have A360553, complement A360554.
- For 0-prepended differences (A360555) we have A360556, complement A360557.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    Select[Range[100],Median[Length/@Split[prix[#]]] == Median[Differences[Prepend[prix[#],0]]]&]

A360691 Number of integer partitions of n with non-integer median of 0-prepended first differences.

Original entry on oeis.org

0, 1, 0, 1, 2, 4, 3, 4, 5, 10, 10, 15, 22, 26, 34, 42, 57, 63, 85, 105, 121, 149, 202, 230, 305, 355, 459, 544, 687, 778, 991, 1130, 1396, 1598, 1947, 2258, 2761, 3143, 3820, 4412, 5330, 6104, 7404, 8499, 10105, 11694, 13922, 15917, 18904, 21646, 25462, 29213
Offset: 1

Views

Author

Gus Wiseman, Feb 22 2023

Keywords

Comments

All of these partitions have even length.
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 a(1) = 0 through a(10) = 10 partitions:
  .  (11)  .  (31)  (32)    (33)    (52)    (53)    (54)      (55)
                    (2111)  (51)    (2221)  (71)    (72)      (73)
                            (2211)  (4111)  (3311)  (3222)    (91)
                            (3111)          (5111)  (6111)    (3322)
                                                    (321111)  (3331)
                                                              (4411)
                                                              (5311)
                                                              (7111)
                                                              (322111)
                                                              (421111)
		

Crossrefs

For median 0 we have A360254, ranks A360558.
These partitions have ranks A360557, complement A360556.
The complement is counted by A360688.
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by number of parts.
A325347 counts partitions with integer median, complement A307683.
A359893 and A359901 count partitions by median, odd-length A359902.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n], !IntegerQ[Median[Differences[Prepend[Reverse[#],0]]]]&]],{n,30}]

A360680 Numbers for which the prime signature has the same mean as the first differences of 0-prepended prime indices.

Original entry on oeis.org

1, 2, 6, 30, 49, 152, 210, 513, 1444, 1776, 1952, 2310, 2375, 2664, 2760, 2960, 3249, 3864, 3996, 4140, 4144, 5796, 5994, 6072, 6210, 6440, 6512, 6517, 6900, 7176, 7400, 7696, 8694, 9025, 9108, 9384, 10064, 10120, 10350, 10488, 10764, 11248, 11960, 12167
Offset: 1

Views

Author

Gus Wiseman, Feb 19 2023

Keywords

Comments

A number's (unordered) prime signature (row n of A118914) is the multiset of positive exponents in its prime factorization.

Examples

			The terms together with their prime indices begin:
      1: {}
      2: {1}
      6: {1,2}
     30: {1,2,3}
     49: {4,4}
    152: {1,1,1,8}
    210: {1,2,3,4}
    513: {2,2,2,8}
   1444: {1,1,8,8}
   1776: {1,1,1,1,2,12}
   1952: {1,1,1,1,1,18}
   2310: {1,2,3,4,5}
   2375: {3,3,3,8}
   2664: {1,1,1,2,2,12}
   2760: {1,1,1,2,3,9}
   2960: {1,1,1,1,3,12}
For example, the prime indices of 2760 are {1,1,1,2,3,9}. The signature is (3,1,1,1), with mean 3/2. The first differences of 0-prepended prime indices are (1,0,0,1,1,6), with mean also 3/2. So 2760 is in the sequence.
		

Crossrefs

For indices instead of 0-prepended differences: A359903, counted by A360068.
For median instead of mean we have A360681.
A112798 = prime indices, length A001222, sum A056239, mean A326567/A326568.
A124010 gives prime signature, mean A088529/A088530.
A316413 = numbers whose prime indices have integer mean, complement A348551.
A326619/A326620 gives mean of distinct prime indices.
A360614/A360615 = mean of first differences of 0-prepended prime indices.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    Select[Range[1000],Mean[Length/@Split[prix[#]]] == Mean[Differences[Prepend[prix[#],0]]]&]
Previous Showing 11-20 of 20 results.