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 41-50 of 61 results. Next

A305735 Number of integer partitions of n whose greatest common divisor is a prime number.

Original entry on oeis.org

0, 1, 1, 1, 1, 3, 1, 3, 2, 7, 1, 10, 1, 15, 8, 17, 1, 34, 1, 37, 16, 56, 1, 80, 6, 101, 27, 122, 1, 208, 1, 209, 57, 297, 20, 410, 1, 490, 102, 599, 1, 901, 1, 948, 194, 1255, 1, 1690, 14, 1985, 298, 2337, 1, 3327, 61, 3597, 491, 4565, 1, 6031, 1, 6842, 802
Offset: 1

Views

Author

Gus Wiseman, Jun 22 2018

Keywords

Examples

			The a(10) = 7 integer partitions are (82), (64), (622), (55), (442), (4222), (22222).
		

Crossrefs

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],PrimeQ[GCD@@#]&]],{n,20}]
  • PARI
    seq(n)={dirmul(vector(n, n, numbpart(n)), dirmul(vector(n, n, moebius(n)), vector(n, n, isprime(n))))} \\ Andrew Howroyd, Jun 22 2018

Formula

a(n) = Sum_{d|n} A143519(d) * A000041(n/d). - Andrew Howroyd, Jun 22 2018

A316898 Number of integer partitions of n into relatively prime parts whose reciprocal sum is the reciprocal of an integer.

Original entry on oeis.org

1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 2, 4, 1, 3, 1, 1, 1, 3, 1, 8, 3, 1, 1, 9, 2, 11, 3, 3, 3, 5, 2, 7, 6, 4, 7, 12, 5, 14, 6, 11, 12, 25, 11, 27, 17, 15, 19, 25, 9, 37, 20, 21, 19, 31, 19, 38, 33, 26, 37, 38, 36, 64, 39, 46, 53, 63, 39, 80, 63, 65, 66, 94, 59, 105
Offset: 1

Views

Author

Gus Wiseman, Jul 16 2018

Keywords

Comments

The reciprocal sum of (y_1, ..., y_k) is 1/y_1 + ... + 1/y_k.
Records: 1, 2, 4, 8, 9, 11, 12, 14, 25, 27, 37, 38, 64, 80, 94, 105, 119, 154, 184, ..., . - Robert G. Wilson v, Jul 18 2018

Examples

			The a(37) = 8 partitions: (20,12,5), (15,12,10), (24,8,3,2), (15,10,6,6), (20,5,4,4,4), (15,10,6,3,3), (14,7,7,7,2), (10,10,10,5,2).
		

Crossrefs

Programs

  • Mathematica
    f[n_] := Block[{k = 1, s = 0, lmt = 1 + PartitionsP@ n}, While[k < lmt, s += Length[ Select[ IntegerPartitions[n, {k, k}], GCD @@ # == 1 && IntegerQ[1/Sum[1/m, {m, #}]] &]]; k++]; s]; Array[f, 50] (* slightly modified by Robert G. Wilson v, Jul 17 2018 *) (* or *)
    ric[n_,p_,s_] := If[n==0, If[IntegerQ[1/s] && GCD @@ p == 1, c++], Do[ If[s + 1/i <= 1, ric[n-i, Append[p, i], s + 1/i]], {i, Min[p[[-1]], n], 1, -1}]]; a[n_] := (c=0; Do[ric[n-j, {j}, 1/j], {j, n}]; c); Array[a, 50] (* Giovanni Resta, Jul 18 2018 *)

Extensions

a(51)-a(91) from Robert G. Wilson v, Jul 17 2018

A319179 Number of integer partitions of n that are relatively prime but not aperiodic. Number of integer partitions of n that are aperiodic but not relatively prime.

Original entry on oeis.org

0, 1, 1, 1, 1, 2, 1, 3, 2, 6, 1, 9, 1, 14, 7, 17, 1, 32, 1, 36, 15, 55, 1, 77, 6, 100, 27, 121, 1, 200, 1, 209, 56, 296, 19, 403, 1, 489, 101, 596, 1, 885, 1, 947, 192, 1254, 1, 1673, 14, 1979, 297, 2336, 1, 3300, 60, 3594, 490, 4564, 1, 5988, 1, 6841, 800
Offset: 1

Views

Author

Gus Wiseman, Sep 12 2018

Keywords

Comments

An integer partition is aperiodic if its multiplicities are relatively prime.

Examples

			The a(12) = 9 integer partitions that are relatively prime but not aperiodic:
  (5511),
  (332211), (333111), (441111),
  (22221111), (33111111),
  (222111111),
  (2211111111),
  (111111111111).
The a(12) = 9 integer partitions that are aperiodic but not relatively prime:
  (12),
  (8,4), (9,3), (10,2),
  (6,3,3), (6,4,2), (8,2,2),
  (6,2,2,2),
  (4,2,2,2,2).
		

Crossrefs

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],And[GCD@@#==1,GCD@@Length/@Split[#]>1]&]],{n,30}]

A320805 Number of non-isomorphic multiset partitions of weight n in which each part, as well as the multiset union of the parts, is an aperiodic multiset.

Original entry on oeis.org

1, 1, 2, 6, 16, 55, 139, 516, 1500, 5269, 17017
Offset: 0

Views

Author

Gus Wiseman, Nov 07 2018

Keywords

Comments

Also the number of nonnegative integer matrices up to row and column permutations with sum of elements equal to n and no zero rows or columns, in which (1) the positive entries in each row are relatively prime and (2) the column sums are relatively prime.
A multiset is aperiodic if its multiplicities are relatively prime.
The weight of a multiset partition is the sum of sizes of its parts. Weight is generally not the same as number of vertices.

Examples

			Non-isomorphic representatives of the a(1) = 1 through a(4) = 16 multiset partitions:
  {{1}}  {{1,2}}    {{1,2,2}}      {{1,2,2,2}}
         {{1},{2}}  {{1,2,3}}      {{1,2,3,3}}
                    {{1},{2,3}}    {{1,2,3,4}}
                    {{2},{1,2}}    {{1},{2,3,3}}
                    {{1},{2},{2}}  {{1},{2,3,4}}
                    {{1},{2},{3}}  {{1,2},{3,4}}
                                   {{1,3},{2,3}}
                                   {{2},{1,2,2}}
                                   {{3},{1,2,3}}
                                   {{1},{1},{2,3}}
                                   {{1},{2},{3,4}}
                                   {{1},{3},{2,3}}
                                   {{2},{2},{1,2}}
                                   {{1},{2},{2},{2}}
                                   {{1},{2},{3},{3}}
                                   {{1},{2},{3},{4}}
		

Crossrefs

A298262 Number of integer partitions of n using relatively prime non-divisors of n.

Original entry on oeis.org

0, 0, 0, 0, 1, 0, 3, 1, 3, 2, 13, 1, 23, 7, 10, 8, 65, 5, 104, 11, 53, 53, 252, 8, 244, 124, 203, 67, 846, 22, 1237, 157, 636, 569, 1074, 51, 3659, 1140, 1827, 221, 7244, 236, 10086, 1162, 1844, 4169, 19195, 225, 17657, 2997
Offset: 1

Views

Author

Gus Wiseman, Jan 15 2018

Keywords

Examples

			The a(11) = 13 partitions: (65), (74), (83), (92), (443), (533), (542), (632), (722), (3332), (4322), (5222), (32222).
The a(14) = 7 partitions: (9 5), (11 3), (5 5 4), (6 5 3), (8 3 3), (4 4 3 3), (5 3 3 3).
		

Crossrefs

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],And[GCD@@#===1,!Or@@(Divisible[n,#]&/@#)]&]],{n,50}]
  • PARI
    \\ here b(n) is A098743.
    b(n)={polcoef(1/prod(k=1, n, if(n%k, 1 - x^k, 1) + O(x*x^n)), n)}
    a(n)={sumdiv(n, d, moebius(d)*b(n/d))} \\ Andrew Howroyd, Aug 29 2018

Formula

a(n) = Sum_{d|n} mu(n/d) * A098743(d).

A305736 Number of integer partitions of n whose greatest common divisor is composite (nonprime and > 1).

Original entry on oeis.org

0, 0, 0, 1, 0, 1, 0, 2, 1, 1, 0, 4, 0, 1, 1, 5, 0, 4, 0, 8, 1, 1, 0, 14, 1, 1, 3, 16, 0, 10, 0, 22, 1, 1, 1, 41, 0, 1, 1, 45, 0, 18, 0, 57, 9, 1, 0, 94, 1, 8, 1, 102, 0, 38, 1, 138, 1, 1, 0, 221, 0, 1, 17, 231, 1, 59, 0, 298, 1, 22
Offset: 1

Views

Author

Gus Wiseman, Jun 22 2018

Keywords

Examples

			The a(12) = 4 integer partitions are (12), (8 4), (6 6), (4 4 4).
		

Crossrefs

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],!(GCD@@#==1||PrimeQ[GCD@@#])&]],{n,0,20}]
  • PARI
    seq(n)={dirmul(vector(n, n, numbpart(n)), dirmul(vector(n, n, moebius(n)), vector(n, n, n>1&&!isprime(n))))} \\ Andrew Howroyd, Jun 22 2018

Formula

a(n) = A018783(n) - A305735(n). - Andrew Howroyd, Jun 22 2018

A316891 Number of aperiodic integer partitions of n into relatively prime parts whose reciprocal sum is an integer.

Original entry on oeis.org

1, 0, 0, 0, 1, 0, 1, 0, 2, 1, 5, 2, 7, 4, 7, 6, 13, 7, 18, 12, 20, 17, 32, 20, 39, 31, 47, 45, 74, 56, 96, 83, 109, 105, 151, 130, 199, 183, 234, 232, 319, 286, 404, 386, 473, 488, 638, 599, 782, 767, 931, 960, 1197, 1165, 1465, 1477, 1747, 1814, 2212, 2196
Offset: 1

Views

Author

Gus Wiseman, Jul 16 2018

Keywords

Comments

The reciprocal sum of (y_1, ..., y_k) is 1/y_1 + ... + 1/y_k.
A partition is aperiodic if its multiplicities are relatively prime.

Examples

			The a(17) = 13 partitions:
(6443),
(44441),
(3332222), (6322211),
(44222111),
(222222221), (333221111), (632111111),
(4421111111),
(22222211111), (33311111111),
(2222111111111),
(221111111111111).
		

Crossrefs

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],And[GCD@@#==1,GCD@@Length/@Split[#]==1,IntegerQ[Sum[1/m,{m,#}]]]&]],{n,50}]

Extensions

a(51)-a(60) from Alois P. Heinz, Jul 18 2018

A316893 Number of aperiodic integer partitions of n into relatively prime parts whose reciprocal sum is 1.

Original entry on oeis.org

1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 1, 3, 1, 2, 1, 1, 1, 2, 1, 5, 3, 1, 1, 5, 2, 9, 3, 3, 3, 4, 2, 6, 6, 3, 4, 9, 5, 10, 4, 10, 8, 15, 10, 21, 12, 14, 16, 18, 9, 30, 18, 17, 16, 28, 16, 29, 25, 26, 30, 28, 33, 48, 31
Offset: 1

Views

Author

Gus Wiseman, Jul 16 2018

Keywords

Comments

The reciprocal sum of (y_1, ..., y_k) is 1/y_1 + ... + 1/y_k.
A partition is aperiodic if its multiplicities are relatively prime.

Crossrefs

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],And[GCD@@#==1,GCD@@Length/@Split[#]==1,Sum[1/m,{m,#}]==1]&]],{n,30}]

Extensions

a(71)-a(80) from Giovanni Resta, Jul 16 2018

A319054 Maximum product of an aperiodic integer partition of n.

Original entry on oeis.org

1, 2, 3, 4, 6, 8, 12, 18, 24, 36, 54, 72, 108, 162, 216, 324, 486, 648, 972, 1458, 1944, 2916, 4374, 5832, 8748, 13122, 17496, 26244, 39366, 52488, 78732, 118098, 157464, 236196, 354294, 472392, 708588, 1062882, 1417176, 2125764, 3188646, 4251528, 6377292
Offset: 1

Views

Author

Gus Wiseman, Sep 09 2018

Keywords

Comments

An integer partition is aperiodic if its multiplicities are relatively prime.

Examples

			Among the aperiodic partitions of 9, those with maximum product are (432) and (3222), so a(9) = 24. If periodic partitions were allowed, we would have (333) with product 27.
		

Crossrefs

Programs

  • Mathematica
    Table[Max[Times@@@Select[IntegerPartitions[n],GCD@@Length/@Split[#]==1&]],{n,30}]

A319811 Number of totally aperiodic integer partitions of n.

Original entry on oeis.org

1, 1, 2, 3, 6, 7, 14, 17, 27, 34, 55, 63, 99, 117, 162, 203, 286, 333, 469, 558, 737, 903, 1196, 1414, 1860, 2232, 2839, 3422, 4359, 5144, 6531, 7762, 9617, 11479, 14182, 16715, 20630, 24333, 29569, 34890, 42335, 49515, 59871, 70042, 83810, 98105, 117152
Offset: 1

Views

Author

Gus Wiseman, Sep 28 2018

Keywords

Comments

An integer partition is totally aperiodic iff either it is strict or it is aperiodic with totally aperiodic multiplicities.

Examples

			The a(6) = 7 aperiodic integer partitions are: (6), (51), (42), (411), (321), (3111), (21111). The first aperiodic integer partition that is not totally aperiodic is (432211).
		

Crossrefs

Programs

  • Mathematica
    totaperQ[m_]:=Or[UnsameQ@@m,And[GCD@@Length/@Split[Sort[m]]==1,totaperQ[Sort[Length/@Split[Sort[m]]]]]];
    Table[Length[Select[IntegerPartitions[n],totaperQ]],{n,30}]
Previous Showing 41-50 of 61 results. Next