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 21-28 of 28 results.

A340691 Greatest image of A001222 over the prime indices of n.

Original entry on oeis.org

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

Views

Author

Gus Wiseman, Jan 28 2021

Keywords

Comments

For the initial term, we assume the empty set has maximum image 0.
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 4070 are {1,3,5,12} -> {0,1,1,3}, so a(4070) = 3.
The prime indices of 8892 are {1,1,2,2,6,8} -> {0,0,1,1,2,3} so a(8892) = 3.
		

Crossrefs

Positions of first appearances are A033844.
Positions of 0's are A000079.
Positions of terms <= 1 are A302540.
Positions of 1's are A302540 \ A000079.
The version for minimum is A340928.
A003963 multiplies together the prime indices.
A056239 adds up the prime indices.
A061395 selects the greatest prime index.
A072233 counts partitions by sum and maximum.
A112798 lists the prime indices of each positive integer.
A303975 counts distinct prime factors in the product of prime indices.

Programs

  • Mathematica
    Table[If[n==1,0,Max@@PrimeOmega/@PrimePi/@First/@FactorInteger[n]],{n,100}]

A360669 Nonprime numbers > 1 for which the prime indices have the same mean as their first differences.

Original entry on oeis.org

10, 39, 68, 115, 138, 259, 310, 328, 387, 517, 574, 636, 793, 795, 1034, 1168, 1206, 1241, 1281, 1340, 1534, 1691, 1825, 2212, 2278, 2328, 2343, 2369, 2370, 2727, 2774, 2905, 3081, 3277, 3818, 3924, 4064, 4074, 4247, 4268, 4360, 4539, 4850, 4905, 5243, 5335
Offset: 1

Views

Author

Gus Wiseman, Feb 18 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 terms together with their prime indices begin:
     1: {}
    10: {1,3}
    39: {2,6}
    68: {1,1,7}
   115: {3,9}
   138: {1,2,9}
   259: {4,12}
   310: {1,3,11}
   328: {1,1,1,13}
   387: {2,2,14}
   517: {5,15}
   574: {1,4,13}
   636: {1,1,2,16}
For example, the prime indices of 138 are {1,2,9}, with mean 4, and with first differences (1,7), with mean also 4, so 138 is in the sequence.
		

Crossrefs

These partitions are counted by A360670.
A058398 counts partitions by mean, see also A008284, A327482.
A112798 = prime indices, length A001222, sum A056239, mean A326567/A326568.
A124010 gives prime signature, mean A088529/A088530.
A301987 lists numbers whose sum of prime indices equals their product.
A316413 lists numbers whose prime indices have integer mean.
A334201 adds up all prime indices except the greatest.
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,1000],Mean[prix[#]]==Mean[Differences[prix[#]]]&]

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]]]&]

A340829 Number of strict integer partitions of n whose Heinz number (product of primes of parts) is divisible by n.

Original entry on oeis.org

1, 0, 1, 0, 1, 1, 2, 0, 0, 2, 3, 0, 4, 3, 4, 0, 8, 0, 10, 0, 11, 12, 19, 0, 0, 22, 0, 0, 46, 23, 56, 0, 64, 66, 86, 0, 125, 104, 135, 0, 196, 111, 230, 0, 0, 274, 353, 0, 0, 0, 563, 0, 687, 0, 974, 0, 1039, 1052, 1290, 0, 1473, 1511, 0, 0, 2707, 1614, 2664, 0
Offset: 1

Views

Author

Gus Wiseman, Feb 01 2021

Keywords

Comments

The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k), giving a bijective correspondence between positive integers and integer partitions. The Heinz numbers of these partitions are squarefree numbers divisible by the sum of their prime indices.

Examples

			The a(6) = 1 through a(19) = 10 partitions (empty columns indicated by dots, A = 10, B = 11):
  321  43   .  .  631   65    .  76    941   A32    .  A7     .  B8
       421        4321  542      643   6431  6432      764       865
                        5321     652   7421  9321      872       874
                                 6421        54321     971       982
                                                       7532      A81
                                                       7541      8542
                                                       7631      8632
                                                       74321     8641
                                                                 8731
                                                                 85321
		

Crossrefs

Note: A-numbers of Heinz-number sequences are in parentheses below.
Positions of zeros are 2 and A013929.
The non-strict version is A330950 (A324851) q.v.
A000009 counts strict partitions.
A003963 multiplies together prime indices.
A018818 counts partitions into divisors (A326841).
A047993 counts balanced partitions (A106529).
A056239 adds up prime indices.
A057568 counts partitions whose product is divisible by their sum (A326149).
A067538 counts partitions whose length/max divides sum (A316413/A326836).
A072233 counts partitions by sum and length, with strict case A008289.
A102627 counts strict partitions whose length divides sum.
A112798 lists the prime indices of each positive integer.
A120383 lists numbers divisible by all of their prime indices.
A324850 lists numbers divisible by the product of their prime indices.
A324925 counts partitions whose Heinz number is divisible by their product.
A326842 counts partitions whose parts and length all divide sum (A326847).
A326850 counts strict partitions whose maximum part divides sum.
A326851 counts strict partitions with length and maximum dividing sum.
A330952 counts partitions whose Heinz number is divisible by all parts.
A340828 counts strict partitions with length divisible by maximum.
A340830 counts strict partitions with parts divisible by length.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&Divisible[Times@@Prime/@#,n]&]],{n,30}]

A340928 Least image of A001222 applied to the prime indices of n.

Original entry on oeis.org

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

Views

Author

Gus Wiseman, Jan 28 2021

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 4277 are {4,6,15} with images {2,2,2}, so a(4277) = 2.
The prime indices of 8303 are {8,8,9} with images {3,3,2}, so a(8303) = 2.
		

Crossrefs

Positions of 0's are A000079.
Positions of first appearances are A033844.
The version for maximum is A340691.
A003963 multiplies together the prime indices.
A026794 counts partitions by sum and minimum.
A056239 adds up the prime indices.
A061395 selects the greatest prime index.
A112798 lists the prime indices of each positive integer.

Programs

  • Mathematica
    Table[If[n==1,0,Min@@PrimeOmega/@PrimePi/@First/@FactorInteger[n]],{n,100}]

A360668 Numbers > 1 whose greatest prime index is not divisible by their number of prime factors (bigomega).

Original entry on oeis.org

4, 8, 10, 12, 15, 16, 18, 22, 24, 25, 27, 28, 32, 33, 34, 36, 40, 42, 44, 46, 48, 51, 54, 55, 60, 62, 63, 64, 66, 68, 69, 70, 72, 76, 77, 80, 81, 82, 85, 88, 90, 93, 94, 96, 98, 99, 100, 102, 104, 105, 108, 110, 112, 114, 115, 116, 118, 119, 120, 121, 123, 124
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.
Also numbers > 1 whose first differences of 0-prepended prime indices have non-integer mean.

Examples

			The prime indices of 1617 are {2,4,4,5}, and 5 is not divisible by 4, so 1617 is in the sequence.
		

Crossrefs

These partitions are counted by A200727.
The complement is A340610 (without 1), counted by A168659.
For median instead of mean we have A360557, counted by A360691.
Positions of terms > 1 in A360615 (numerator: A360614).
A058398 counts partitions by mean, see also A008284, A327482.
A067340 lists numbers whose prime signature has integer mean.
A112798 = prime indices, length A001222, sum A056239, mean A326567/A326568.
A334201 adds up all prime indices except the greatest.
A348551 = numbers w/ non-integer mean of prime indices, complement A316413.

Programs

  • Mathematica
    Select[Range[2,100],!Divisible[PrimePi[FactorInteger[#][[-1,1]]],PrimeOmega[#]]&]

A360670 Number of integer partitions of n whose parts have the same mean as their negated first differences.

Original entry on oeis.org

1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 2, 0, 0, 1, 2, 0, 2, 0, 2, 2, 0, 0, 5, 1, 0, 3, 3, 0, 4, 0, 5, 3, 0, 2, 10, 0, 0, 4, 10, 0, 5, 0, 7, 9, 0, 0, 17, 1, 6, 5, 10, 0, 9, 8, 14, 6, 0, 0, 34, 0, 0, 9, 18, 13, 13, 0, 17, 7, 19, 0, 40, 0, 0, 28
Offset: 0

Views

Author

Gus Wiseman, Feb 18 2023

Keywords

Examples

			The a(n) partitions for n = 4, 12, 24, 27, 30, 44:
  (3,1)  (9,3)    (18,6)      (19,7,1)  (21,8,1)      (33,11)
         (9,2,1)  (17,6,1)    (20,5,2)  (22,6,2)      (34,5,4,1)
                  (18,4,2)    (21,3,3)  (23,4,3)      (34,6,3,1)
                  (19,2,2,1)            (25,2,1,1,1)  (34,7,2,1)
                  (19,3,1,1)                          (34,8,1,1)
                                                      (35,4,3,2)
                                                      (35,5,2,2)
For example, the partition y = (28,4,3,1), with mean 9, has negated first differences (24,2,1), with mean 9, so y is counted under a(36).
		

Crossrefs

These partitions have ranks A360669.
A000041 counts integer partitions, strict A000009.
A058398 counts partitions by mean, see also A008284, A327482.
A067538 counts partitions with integer mean, strict A102627, ranks A316413.
A326567/A326568 gives mean of prime indices.
A360614/A360615 = mean of first differences of 0-prepended prime indices.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n], Mean[#]==Mean[Differences[Reverse[#]]]&]],{n,0,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 21-28 of 28 results.