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 22 results. Next

A366844 Number of strict integer partitions of n into odd relatively prime parts.

Original entry on oeis.org

0, 1, 0, 0, 1, 0, 1, 0, 2, 1, 2, 1, 2, 2, 3, 3, 5, 4, 4, 5, 6, 7, 8, 8, 9, 11, 12, 12, 15, 16, 15, 19, 23, 23, 26, 28, 30, 34, 37, 38, 44, 48, 48, 56, 62, 63, 72, 77, 82, 92, 96, 102, 116, 124, 128, 142, 155, 162, 178, 191, 200, 222, 236, 246, 276, 291, 303, 334
Offset: 0

Views

Author

Gus Wiseman, Oct 29 2023

Keywords

Examples

			The a(n) partitions for n = 1, 8, 14, 17, 16, 20, 21:
  (1)  (5,3)  (9,5)   (9,5,3)   (9,7)      (11,9)      (9,7,5)
       (7,1)  (11,3)  (9,7,1)   (11,5)     (13,7)      (11,7,3)
              (13,1)  (11,5,1)  (13,3)     (17,3)      (11,9,1)
                      (13,3,1)  (15,1)     (19,1)      (13,5,3)
                                (7,5,3,1)  (9,7,3,1)   (13,7,1)
                                           (11,5,3,1)  (15,5,1)
                                                       (17,3,1)

Crossrefs

This is the relatively prime case of A000700.
The pairwise coprime version is the odd-part case of A007360.
Allowing even parts gives A078374.
The halved even version is A078374 aerated.
The non-strict version is A366843, with evens A000837.
The complement is counted by the strict case of A366852, with evens A018783.
A000041 counts integer partitions, strict A000009 (also into odds).
A051424 counts pairwise coprime partitions, for odd parts A366853.
A113685 counts partitions by sum of odd parts, rank statistic A366528.
A168532 counts partitions by gcd.
A366842 counts partitions whose odd parts have a common divisor > 1.
Cf. A007359, A047967, A055922, A066208, A116598, A239261, A302697, A337485, A365067, A366845, A366848.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n], And@@OddQ/@#&&UnsameQ@@#&&GCD@@#==1&]],{n,0,30}]
  • Python
    from math import gcd
from sympy.utilities.iterables import partitions
def A366844(n): return sum(1 for p in partitions(n) if all(d==1 for d in p.values()) and all(d&1 for d in p) and gcd(*p)==1) # Chai Wah Wu, Oct 30 2023

Extensions

More terms from Chai Wah Wu, Oct 30 2023

A303283 Squarefree numbers whose prime indices have no common divisor other than 1 but are not pairwise coprime.

Original entry on oeis.org

42, 78, 105, 114, 130, 174, 182, 195, 210, 222, 230, 231, 258, 266, 285, 318, 345, 357, 366, 370, 390, 406, 426, 429, 435, 455, 462, 470, 474, 483, 494, 518, 534, 546, 555, 570, 598, 602, 606, 610, 627, 638, 642, 645, 651, 663, 665, 678, 690, 705, 714, 715
Offset: 1

Views

Author

Gus Wiseman, Apr 20 2018

Keywords

Comments

A prime index of n is a number m such that prime(m) divides n. Two or more numbers are coprime if no pair of them has a common divisor other than 1.
The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k).

Examples

			The sequence of strict integer partitions whose Heinz numbers belong to this sequence begins (4,2,1), (6,2,1), (4,3,2), (8,2,1), (6,3,1), (10,2,1), (6,4,1), (6,3,2), (4,3,2,1), (12,2,1), (9,3,1), (5,4,2), (14,2,1), (8,4,1), (8,3,2), (16,2,1), (9,3,2), (7,4,2), (18,2,1), (12,3,1), (6,3,2,1).

Crossrefs

Cf. A000837, A001222, A018783, A051424, A056239, A078374, A168532, A289508, A289509, A296150, A298748, A300486, A302569, A302696, A302796, A303138, A303139, A303140, A303282.

Programs

  • Mathematica
    primeMS[n_]:=If[n===1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[400],SquareFreeQ[#]&&!CoprimeQ@@primeMS[#]&&GCD@@primeMS[#]===1&]

A366845 Number of integer partitions of n that contain at least one even part and whose halved even parts are relatively prime.

Original entry on oeis.org

0, 0, 1, 1, 2, 3, 5, 7, 11, 15, 23, 31, 43, 58, 82, 107, 144, 189, 250, 323, 420, 537, 695, 880, 1114, 1404, 1774, 2210, 2759, 3423, 4239, 5223, 6430, 7869, 9640, 11738, 14266, 17297, 20950, 25256, 30423, 36545, 43824, 52421, 62620, 74599, 88802, 105431
Offset: 0

Views

Author

Gus Wiseman, Oct 28 2023

Keywords

Examples

			The partition y = (6,4) has halved even parts (3,2) which are relatively prime, so y is counted under a(10).
The a(2) = 1 through a(9) = 15 partitions:
  (2)  (21)  (22)   (32)    (42)     (52)      (62)       (72)
             (211)  (221)   (222)    (322)     (332)      (432)
                    (2111)  (321)    (421)     (422)      (522)
                            (2211)   (2221)    (521)      (621)
                            (21111)  (3211)    (2222)     (3222)
                                     (22111)   (3221)     (3321)
                                     (211111)  (4211)     (4221)
                                               (22211)    (5211)
                                               (32111)    (22221)
                                               (221111)   (32211)
                                               (2111111)  (42111)
                                                          (222111)
                                                          (321111)
                                                          (2211111)
                                                          (21111111)

Crossrefs

For all parts we have A000837, complement A018783.
These partitions have ranks A366847.
For odd parts we have A366850, ranks A366846, complement A366842.
A000041 counts integer partitions, strict A000009, complement A047967.
A035363 counts partitions into all even parts, ranks A066207.
A078374 counts relatively prime strict partitions.
A168532 counts partitions by gcd.
A239261 counts partitions with (sum of odd parts) = (sum of even parts).
A366531 = 2*A366533 adds up even prime indices, triangle A113686/A174713.
Cf. A051424, A113685, A116598, A258117, A289509, A366843, A366849.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n], GCD@@Select[#,EvenQ]/2==1&]],{n,0,30}]

A303138 Regular triangle where T(n,k) is the number of strict integer partitions of n with greatest common divisor k.

Original entry on oeis.org

1, 0, 1, 1, 0, 1, 1, 0, 0, 1, 2, 0, 0, 0, 1, 2, 1, 0, 0, 0, 1, 4, 0, 0, 0, 0, 0, 1, 4, 1, 0, 0, 0, 0, 0, 1, 6, 0, 1, 0, 0, 0, 0, 0, 1, 7, 2, 0, 0, 0, 0, 0, 0, 0, 1, 11, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 10, 2, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 17, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 17, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 23, 0, 2, 0, 1
Offset: 1

Views

Author

Gus Wiseman, Apr 19 2018

Keywords

Examples

			Triangle begins:
01:   1
02:   0  1
03:   1  0  1
04:   1  0  0  1
05:   2  0  0  0  1
06:   2  1  0  0  0  1
07:   4  0  0  0  0  0  1
08:   4  1  0  0  0  0  0  1
09:   6  0  1  0  0  0  0  0  1
10:   7  2  0  0  0  0  0  0  0  1
11:  11  0  0  0  0  0  0  0  0  0  1
12:  10  2  1  1  0  0  0  0  0  0  0  1
13:  17  0  0  0  0  0  0  0  0  0  0  0  1
14:  17  4  0  0  0  0  0  0  0  0  0  0  0  1
15:  23  0  2  0  1  0  0  0  0  0  0  0  0  0  1
The strict partitions counted in row 12 are the following.
T(12,1) = 10: (11,1) (9,2,1) (8,3,1) (7,5) (7,4,1) (7,3,2) (6,5,1) (6,3,2,1) (5,4,3) (5,4,2,1)
T(12,2) = 2:  (10,2) (6,4,2)
T(12,3) = 1:  (9,3)
T(12,4) = 1:  (8,4)
T(12,12) = 1: (12)

Crossrefs

First column is A078374. Second column at even indices is same as first column. Row sums are A000009. Row sums with first column removed are A303280.
Cf. A000009, A000837, A018783, A051424, A117408, A168532, A289508, A289509, A298748, A300486, A302698, A302796, A303139, A303140, A303280.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&GCD@@#===k&]],{n,15},{k,n}]

Formula

If k divides n, T(n,k) = A078374(n/k); otherwise T(n,k) = 0.

A366850 Number of integer partitions of n whose odd parts are relatively prime.

Original entry on oeis.org

0, 1, 1, 2, 3, 5, 7, 11, 16, 22, 32, 43, 60, 80, 110, 140, 194, 244, 327, 410, 544, 670, 883, 1081, 1401, 1708, 2195, 2651, 3382, 4069, 5129, 6157, 7708, 9194, 11438, 13599, 16788, 19911, 24432, 28858, 35229, 41507, 50359, 59201, 71489, 83776, 100731, 117784
Offset: 0

Views

Author

Gus Wiseman, Oct 28 2023

Keywords

Examples

			The a(1) = 1 through a(8) = 16 partitions:
  (1)  (11)  (21)   (31)    (41)     (51)      (61)       (53)
             (111)  (211)   (221)    (321)     (331)      (71)
                    (1111)  (311)    (411)     (421)      (431)
                            (2111)   (2211)    (511)      (521)
                            (11111)  (3111)    (2221)     (611)
                                     (21111)   (3211)     (3221)
                                     (111111)  (4111)     (3311)
                                               (22111)    (4211)
                                               (31111)    (5111)
                                               (211111)   (22211)
                                               (1111111)  (32111)
                                                          (41111)
                                                          (221111)
                                                          (311111)
                                                          (2111111)
                                                          (11111111)

Crossrefs

For all parts (not just odd) we have A000837, complement A018783.
The complement is counted by A366842.
These partitions have ranks A366846.
A000041 counts integer partitions, strict A000009 (also into odds).
A000740 counts relatively prime compositions.
A078374 counts relatively prime strict partitions.
A113685 counts partitions by sum of odd parts, rank statistic A366528.
A168532 counts partitions by gcd.
A239261 counts partitions with (sum of odd parts) = (sum of even parts).
Cf. A007359, A047967, A051424, A066208, A116598, A365067, A366843, A366844, A366845, A366848.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],GCD@@Select[#,OddQ]==1&]],{n,0,30}]

A317099 Number of series-reduced planted achiral trees whose leaves span an initial interval of positive integers appearing with multiplicities an integer partition of n.

Original entry on oeis.org

1, 3, 4, 9, 8, 19, 16, 35, 35, 54, 57, 113, 102, 155, 189, 279, 298, 447, 491, 702, 813, 1063, 1256, 1759, 1967, 2542, 3050, 3902, 4566, 5882, 6843, 8676, 10205, 12612, 14908, 18608, 21638, 26510, 31292, 38150, 44584, 54185, 63262, 76308, 89371, 106818, 124755
Offset: 1

Views

Author

Gus Wiseman, Aug 01 2018

Keywords

Comments

In these trees, achiral means that all branches directly under any given node that is not a leaf or a cover of leaves are equal, and series-reduced means that every node that is not a leaf or a cover of leaves has at least two branches.

Examples

			The a(4) = 9 trees:
  (1111), ((11)(11)), (((1)(1))((1)(1))), ((1)(1)(1)(1)),
  (1112),
  (1122), ((12)(12)),
  (1123),
  (1234).
The a(6) = 19 trees:
  (111111), ((111)(111)), (((1)(1)(1))((1)(1)(1))), ((11)(11)(11)), (((1)(1))((1)(1))((1)(1))), ((1)(1)(1)(1)(1)(1)),
  (111112),
  (111122), ((112)(112)),
  (111123),
  (111222), ((12)(12)(12)),
  (111223),
  (111234),
  (112233), ((123)(123)),
  (112234),
  (112345),
  (123456).

Crossrefs

Cf. A001678, A003238, A052409, A052410, A067824, A167865, A168532, A214577, A289078, A294336, A316782, A317100.

Programs

  • Mathematica
    b[n_]:=1+Sum[b[n/d],{d,Rest[Divisors[n]]}];
a[n_]:=Sum[b[GCD@@Length/@Split[ptn]],{ptn,IntegerPartitions[n]}];
Array[a,30]

A366852 Number of integer partitions of n into odd parts with a common divisor > 1.

Original entry on oeis.org

0, 0, 0, 1, 0, 1, 1, 1, 0, 2, 1, 1, 2, 1, 1, 4, 0, 1, 4, 1, 2, 6, 1, 1, 6, 3, 1, 8, 2, 1, 13, 1, 0, 13, 1, 7, 15, 1, 1, 19, 6, 1, 25, 1, 2, 33, 1, 1, 32, 5, 10, 39, 2, 1, 46, 14, 6, 55, 1, 1, 77, 1, 1, 82, 0, 20, 92, 1, 2, 105, 31, 1, 122, 1, 1, 166, 2, 16, 168
Offset: 0

Views

Author

Gus Wiseman, Nov 01 2023

Keywords

Examples

			The a(n) partitions for n = 3, 9, 15, 21, 25, 27:
(3)  (9)      (15)         (21)             (25)         (27)
     (3,3,3)  (5,5,5)      (7,7,7)          (15,5,5)     (9,9,9)
              (9,3,3)      (9,9,3)          (5,5,5,5,5)  (15,9,3)
              (3,3,3,3,3)  (15,3,3)                      (21,3,3)
                           (9,3,3,3,3)                   (9,9,3,3,3)
                           (3,3,3,3,3,3,3)               (15,3,3,3,3)
                                                         (9,3,3,3,3,3,3)
                                                         (3,3,3,3,3,3,3,3,3)

Links

Crossrefs

Allowing even parts gives A018783, complement A000837.
For parts > 1 instead of gcd > 1 we have A087897.
For gcd = 1 instead of gcd > 1 we have A366843.
The strict case is A366750, with evens A303280.
The strict complement is A366844, with evens A078374.
A000041 counts integer partitions, strict A000009 (also into odd parts).
A000700 counts strict partitions into odd parts.
A113685 counts partitions by sum of odd parts, rank statistic A366528.
A168532 counts partitions by gcd.
A366842 counts partitions whose odd parts have a common divisor > 1.
Cf. A007359, A047967, A051424, A055922, A066208, A302698, A337485, A365067, A366845, A366848.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],And@@OddQ/@#&&GCD@@#>1&]],{n,15}]
  • Python
    from math import gcd
from sympy.utilities.iterables import partitions
def A366852(n): return sum(1 for p in partitions(n) if all(d&1 for d in p) and gcd(*p)>1) # Chai Wah Wu, Nov 02 2023

Extensions

More terms from Chai Wah Wu, Nov 02 2023
a(0)=0 prepended by Alois P. Heinz, Jan 11 2024

A317100 Number of series-reduced planted achiral trees with n leaves spanning an initial interval of positive integers.

Original entry on oeis.org

1, 3, 5, 12, 17, 41, 65, 144, 262, 533, 1025, 2110, 4097, 8261, 16407, 32928, 65537, 131384, 262145, 524854, 1048647, 2098181, 4194305, 8390924, 16777234, 33558533, 67109132, 134226070, 268435457, 536887919, 1073741825, 2147516736, 4294968327, 8590000133
Offset: 1

Views

Author

Gus Wiseman, Aug 01 2018

Keywords

Comments

In these trees, achiral means that all branches directly under any given node that is not a leaf or a cover of leaves are equal, and series-reduced means that every node that is not a leaf or a cover of leaves has at least two branches.

Examples

			The a(4) = 12 trees:
  (1111), ((11)(11)), (((1)(1))((1)(1))), ((1)(1)(1)(1)),
  (1222),
  (1122), ((12)(12)),
  (1112),
  (1233),
  (1223),
  (1123),
  (1234).

Links

Crossrefs

Cf. A001678, A003238, A052409, A052410, A067824, A167865, A168532, A214577, A289078, A294336, A316782, A317099.

Programs

  • Mathematica
    allnorm[n_Integer]:=Function[s,Array[Count[s,y_/;y<=#]+1&,n]]/@Subsets[Range[n-1]+1];
b[n_]:=1+Sum[b[n/d],{d,Rest[Divisors[n]]}];
a[n_]:=Sum[b[GCD@@Length/@Split[ptn]],{ptn,allnorm[n]}];
Array[a,10]
  • PARI
    seq(n)={my(v=vector(n)); for(n=1, n, v[n]=2^(n-1) + sumdiv(n, d, v[d])); v} \\ Andrew Howroyd, Aug 19 2018

Formula

a(n) ~ 2^(n-1). - Vaclav Kotesovec, Sep 07 2019

Extensions

Terms a(21) and beyond from Andrew Howroyd, Aug 19 2018

A366847 Numbers whose halved even prime indices are nonempty and relatively prime.

Original entry on oeis.org

3, 6, 9, 12, 15, 18, 21, 24, 27, 30, 33, 36, 39, 42, 45, 48, 51, 54, 57, 60, 63, 66, 69, 72, 75, 78, 81, 84, 87, 90, 91, 93, 96, 99, 102, 105, 108, 111, 114, 117, 120, 123, 126, 129, 132, 135, 138, 141, 144, 147, 150, 153, 156, 159, 162, 165, 168, 171, 174
Offset: 1

Views

Author

Gus Wiseman, Oct 31 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.
Consists of powers of 2 times elements of the odd restriction A366849.

Examples

			The even prime indices of 91 are {4,6}, halved {2,3}, which are relatively prime, so 91 is in the sequence.
The prime indices of 665 are {3,4,8}, even {4,8}, halved {2,4}, which are not relatively prime, so 665 is not in the sequence.
The terms together with their prime indices begin:
    3: {2}
    6: {1,2}
    9: {2,2}
   12: {1,1,2}
   15: {2,3}
   18: {1,2,2}
   21: {2,4}
   24: {1,1,1,2}
   27: {2,2,2}
   30: {1,2,3}
   33: {2,5}
   36: {1,1,2,2}
   39: {2,6}
   42: {1,2,4}
   45: {2,2,3}
   48: {1,1,1,1,2}

Crossrefs

Including odd indices gives A289509, ones of A289508, counted by A000837.
The complement including odd indices is A318978, counted by A018783.
The partitions with these ranks are counted by A366845.
A version for odd indices A366846, counted by A366850.
The odd restriction is A366849.
A000041 counts integer partitions, strict A000009 (also into odds).
A035363 counts partitions into all even parts, ranks A066207.
A112798 lists prime indices, length A001222, sum A056239.
A162641 counts even prime exponents, odd A162642.
A257992 counts even prime indices, odd A257991.
A366528 adds up odd prime indices, partition triangle A113685.
A366531 = 2*A366533 adds up even prime indices, triangle A113686/A174713.
Cf. A000720, A055396, A061395, A066208, A168532, A302696, A302697, A325698, A366842, A366843, A366844, A366848.

Programs

  • Mathematica
    Select[Range[100],GCD@@Select[PrimePi/@First/@FactorInteger[#],EvenQ]/2==1&]

A366853 Number of integer partitions of n into odd, pairwise coprime parts.

Original entry on oeis.org

1, 1, 1, 2, 2, 3, 3, 4, 5, 6, 7, 8, 9, 10, 12, 14, 17, 18, 20, 22, 25, 29, 33, 36, 39, 43, 49, 55, 61, 66, 69, 75, 85, 94, 104, 113, 120, 129, 143, 159, 172, 183, 193, 207, 226, 251, 272, 288, 304, 325, 350, 383, 414, 437, 460, 494, 532, 577, 622, 655, 684
Offset: 0

Views

Author

Gus Wiseman, Nov 01 2023

Keywords

Examples

			The a(1) = 1 through a(10) = 7 partitions:
1  11  3    31    5      51      7        53        9          73
       111  1111  311    3111    511      71        531        91
                  11111  111111  31111    5111      711        5311
                                 1111111  311111    51111      7111
                                          11111111  3111111    511111
                                                    111111111  31111111
                                                               1111111111

Crossrefs

Partitions into odd parts are counted by A000009, ranks A066208.
Allowing even parts gives A051424.
For relatively prime (not pairwise coprime): A366843, with evens A000837.
A000041 counts integer partitions, strict A000009 (also into odds).
A101268 counts pairwise coprime compositions.
A168532 counts partitions by gcd.
Cf. A007359, A018783, A055922, A078374, A337485, A366844, A366852.

Programs

  • Mathematica
    pwcop[y_]:=And@@(GCD@@#==1&)/@Subsets[y,{2}]
Table[Length[Select[IntegerPartitions[n],And@@OddQ/@#&&pwcop[#]&]],{n,0,30}]
Previous Showing 11-20 of 22 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.