A070211 -id:A070211 - cp's OEIS frontend

A325549 Number of necklace compositions of n with distinct circular differences.

1, 1, 2, 3, 5, 4, 10, 16, 23, 34, 53, 66, 113, 164, 262, 380, 567, 821, 1217, 1778, 2702, 3919, 5760, 8520, 12375

Offset: 1

Gus Wiseman, May 10 2019

A necklace composition of n is a finite sequence of positive integers summing to n that is lexicographically minimal among all of its cyclic rotations.

The circular differences of a composition c of length k are c_{i + 1} - c_i for i < k and c_1 - c_i for i = k. For example, the circular differences of (1,2,1,3) are (1,-1,2,-2).

			The a(1) = 1 through a(8) = 16 necklace compositions:
  (1)  (2)  (3)   (4)    (5)    (6)    (7)     (8)
            (12)  (13)   (14)   (15)   (16)    (17)
                  (112)  (23)   (24)   (25)    (26)
                         (113)  (114)  (34)    (35)
                         (122)         (115)   (116)
                                       (124)   (125)
                                       (133)   (134)
                                       (142)   (143)
                                       (223)   (152)
                                       (1213)  (224)
                                               (233)
                                               (1124)
                                               (1142)
                                               (1214)
                                               (11213)
                                               (11312)

Gus Wiseman, Sequences counting and ranking integer partitions by the differences of their successive parts.

Cf. A000079, A000740, A008965, A034297, A059966, A070211, A318728, A318748, A320348, A325545, A325551, A325554, A325556.

neckQ[q_]:=Array[OrderedQ[{q,RotateRight[q,#]}]&,Length[q]-1,1,And];
Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],neckQ[#]&&UnsameQ@@Append[Differences[#],First[#]-Last[#]]&]],{n,15}]

A068322 Number of arithmetic progressions of positive odd integers, strictly increasing with sum n.

Original entry on oeis.org

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

Offset: 1

Naohiro Nomoto, Feb 27 2002

			From _Petros Hadjicostas_, Sep 29 2019: (Start)
a(12) = 3 because we have the following arithmetic progressions of odd numbers, strictly increasing with sum n=12: 1+11, 3+9, and 5+7.
a(13) = 1 because we have only the following arithmetic progressions of odd numbers, strictly increasing with sum n=13: 13.
a(14) = 3 because we have the following arithmetic progressions of odd numbers, strictly increasing with sum n=14: 1+13, 3+11, and 5+9.
a(15) = 3 because we have the following arithmetic progressions of odd numbers, strictly increasing with sum n=15: 15, 3+5+7, and 1+5+9.
(End)

Seiichi Manyama, Table of n, a(n) for n = 1..10000
Sadek Bouroubi and Nesrine Benyahia Tani, Integer partitions into arithmetic progressions, Rostok. Math. Kolloq. 64 (2009), 11-16.
Sadek Bouroubi and Nesrine Benyahia Tani, Integer partitions into arithmetic progressions with an odd common difference, Integers 9(1) (2009), 77-81.
Graeme McRae, Counting arithmetic sequences whose sum is n.
Graeme McRae, Counting arithmetic sequences whose sum is n [Cached copy]
Augustine O. Munagi, Combinatorics of integer partitions in arithmetic progression, Integers 10(1) (2010), 73-82.
Augustine O. Munagi and Temba Shonhiwa, On the partitions of a number into arithmetic progressions, Journal of Integer Sequences 11 (2008), Article 08.5.4.
A. N. Pacheco Pulido, Extensiones lineales de un poset y composiciones de números multipartitos, Maestría thesis, Universidad Nacional de Colombia, 2012.
Wikipedia, Arithmetic progression.
Gus Wiseman, Sequences counting and ranking integer partitions by the differences of their successive parts.

Cf. A049980, A049981, A049982, A049983, A049986, A049987, A049988, A049989, A049990, A068323, A068324, A070211, A127938, A175327, A325328, A325407, A325545, A325546, A325547, A325548.

From Petros Hadjicostas, Oct 01 2019: (Start)
a(n) = A068324(n) - A001227(n) + (1/2) * (1 - (-1)^n).
G.f.: x/(1 - x^2) + Sum_{m >= 2} x^(m^2)/((1 - x^(2*m)) * (1 - x^(m*(m-1)))).
(End)

A325552 Number of compositions of n with distinct differences up to sign.

Original entry on oeis.org

1, 1, 2, 3, 6, 9, 12, 23, 38, 61, 78, 135, 194, 315, 454, 699, 982, 1495, 2102, 3085, 4406, 6583, 9048, 13117, 18540, 26399, 36484, 51885, 72498, 100031, 139342, 192621, 267068, 367631, 505954, 687153, 946412, 1283367, 1745974, 2356935, 3207554, 4311591, 5816404

Offset: 0

Gus Wiseman, May 11 2019

nonn

A composition of n is a finite sequence of positive integers summing to n.
The differences of a sequence are defined as if the sequence were increasing, so for example the differences of (3,1,2) are (-2,1).
a(n) has the same parity as n for n > 0, since reversing a composition does not change whether or not it has this property, and the only valid symmetric compositions are (n) and (n/2,n/2), with the latter only existing for even n. - Charlie Neder, Jun 06 2019

			The differences of (1,2,1) are (1,-1), which are different but not up to sign, so (1,2,1) is not counted under a(4).
The a(1) = 1 through a(7) = 23 compositions:
  (1)  (2)   (3)   (4)    (5)    (6)    (7)
       (11)  (12)  (13)   (14)   (15)   (16)
             (21)  (22)   (23)   (24)   (25)
                   (31)   (32)   (33)   (34)
                   (112)  (41)   (42)   (43)
                   (211)  (113)  (51)   (52)
                          (122)  (114)  (61)
                          (221)  (132)  (115)
                          (311)  (213)  (124)
                                 (231)  (133)
                                 (312)  (142)
                                 (411)  (214)
                                        (223)
                                        (241)
                                        (322)
                                        (331)
                                        (412)
                                        (421)
                                        (511)
                                        (1132)
                                        (2113)
                                        (2311)
                                        (3112)

Gus Wiseman, Sequences counting and ranking integer partitions by the differences of their successive parts.

Cf. A011782, A070211, A175342, A242882, A325325, A325368, A325404, A325545, A325551, A325553, A325555, A325557.

Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],UnsameQ@@Abs[Differences[#]]&]],{n,0,15}]

a(26)-a(42) from Alois P. Heinz, Jan 27 2024

A342532 Number of even-length compositions of n with alternating parts distinct.

Original entry on oeis.org

1, 0, 1, 2, 3, 4, 9, 14, 28, 44, 83, 136, 250, 424, 757, 1310, 2313, 4018, 7081, 12314, 21650, 37786, 66264, 115802, 202950, 354858, 621525, 1087252, 1903668, 3330882, 5831192, 10204250, 17862232, 31260222, 54716913, 95762576, 167614445, 293356422, 513456686

Offset: 0

Gus Wiseman, Mar 28 2021

nonn

These are finite even-length sequences q of positive integers summing to n such that q(i) != q(i+2) for all possible i.

			The a(2) = 1 through a(7) = 14 compositions:
  (1,1)  (1,2)  (1,3)  (1,4)  (1,5)      (1,6)
         (2,1)  (2,2)  (2,3)  (2,4)      (2,5)
                (3,1)  (3,2)  (3,3)      (3,4)
                       (4,1)  (4,2)      (4,3)
                              (5,1)      (5,2)
                              (1,1,2,2)  (6,1)
                              (1,2,2,1)  (1,1,2,3)
                              (2,1,1,2)  (1,1,3,2)
                              (2,2,1,1)  (1,2,3,1)
                                         (1,3,2,1)
                                         (2,1,1,3)
                                         (2,3,1,1)
                                         (3,1,1,2)
                                         (3,2,1,1)

Andrew Howroyd, Table of n, a(n) for n = 0..500

The strictly decreasing version appears to be A064428 (odd-length: A001522).
The equal version is A065608 (A342527 with odds).
The weakly decreasing version is A114921 (A342528 with odds).
Including odds gives A224958.
A000726 counts partitions with alternating parts unequal.
A325545 counts compositions with distinct first differences.
A342529 counts compositions with distinct first quotients.
Cf. A000009, A000041, A003242, A008965, A032020, A059966, A062968, A064410, A070211, A106351, A175342, A325546.

qdq[q_]:=And@@Table[q[[i]]!=q[[i+2]],{i,Length[q]-2}];
Table[Length[Select[Join@@Permutations/@Select[IntegerPartitions[n],EvenQ[Length[#]]&],qdq]],{n,0,15}]

\\ here gf gives A106351 as g.f.
gf(n, y)={1/(1 - sum(k=1, n, (-1)^(k+1)*x^k*y^k/(1-x^k) + O(x*x^n)))}
seq(n)={my(p=gf(n,y)); Vec(sum(k=0, n\2, polcoef(p,k,y)^2))} \\ Andrew Howroyd, Apr 16 2021

G.f.: 1 + Sum_{k>=1} B_k(x)^2 where B_k(x) is the g.f. of column k of A106351. - Andrew Howroyd, Apr 16 2021

Terms a(24) and beyond from Andrew Howroyd, Apr 16 2021

A328025 Irregular triangle read by rows where row n gives the differences between consecutive divisors of n in weakly decreasing order.

Original entry on oeis.org

1, 2, 2, 1, 4, 3, 1, 1, 6, 4, 2, 1, 6, 2, 5, 3, 1, 10, 6, 2, 1, 1, 1, 12, 7, 5, 1, 10, 2, 2, 8, 4, 2, 1, 16, 9, 3, 3, 1, 1, 18, 10, 5, 2, 1, 1, 14, 4, 2, 11, 9, 1, 22, 12, 4, 2, 2, 1, 1, 1, 20, 4, 13, 11, 1, 18, 6, 2, 14, 7, 3, 2, 1, 28, 15, 5, 4, 2, 1, 1, 1

Offset: 1

Gus Wiseman, Oct 02 2019

			Triangle begins:
   {}
   1
   2
   2  1
   4
   3  1  1
   6
   4  2  1
   6  2
   5  3  1
  10
   6  2  1  1  1
  12
   7  5  1
  10  2  2
   8  4  2  1
  16
   9  3  3  1  1
  18
  10  5  2  1  1
For example, the divisors of 18 are {1,2,3,6,9,18}, with differences {1,1,3,3,9}, so row 18 is {9,3,3,1,1}.

Same as A193829 with rows sorted in weakly decreasing order.
Same as A328027 with rows reversed.
Row sums are A001477.
Row lengths are A000005.
First column is A060681.
Heinz numbers of rows are A328023.
Cf. A027750, A060680, A060682, A060683, A070211, A129308, A328024.

Table[Sort[Differences[Divisors[n]],Greater],{n,30}]

A328027 Irregular triangle read by rows where row n lists, in weakly increasing order, the differences between consecutive divisors of n.

Original entry on oeis.org

1, 2, 1, 2, 4, 1, 1, 3, 6, 1, 2, 4, 2, 6, 1, 3, 5, 10, 1, 1, 1, 2, 6, 12, 1, 5, 7, 2, 2, 10, 1, 2, 4, 8, 16, 1, 1, 3, 3, 9, 18, 1, 1, 2, 5, 10, 2, 4, 14, 1, 9, 11, 22, 1, 1, 1, 2, 2, 4, 12, 4, 20, 1, 11, 13, 2, 6, 18, 1, 2, 3, 7, 14, 28, 1, 1, 1, 2, 4, 5, 15

Offset: 1

Gus Wiseman, Oct 02 2019

			Triangle begins:
   {}
   1
   2
   1  2
   4
   1  1  3
   6
   1  2  4
   2  6
   1  3  5
  10
   1  1  1  2  6
  12
   1  5  7
   2  2 10
   1  2  4  8
  16
   1  1  3  3  9
  18
   1  1  2  5 10
   2  4 14
   1  9 11
  22
   1  1  1  2  2  4 12
For example, the divisors of 18 are {1,2,3,6,9,18}, with differences {1,1,3,3,9}, which is row 18.

Same as A193829 with rows sorted in increasing order.
Same as A328025 with rows reversed.
Row sums are A001477.
Row lengths are A000005.
First column is A060680.
Cf. A027750, A060681, A060682, A060683, A070211, A129308, A328024.

Table[Sort[Differences[Divisors[n]]],{n,30}]

A329145 Number of non-necklace compositions of n.

Original entry on oeis.org

0, 0, 1, 3, 9, 19, 45, 93, 197, 405, 837, 1697, 3465, 7011, 14193, 28653, 57825, 116471, 234549, 471801, 948697, 1906407, 3829581, 7689357, 15435033, 30973005, 62137797, 124630149, 249922665, 501078345, 1004468157, 2013263853, 4034666121, 8084640465

Offset: 1

Gus Wiseman, Nov 10 2019

nonn

A necklace composition of n is a finite sequence of positive integers summing to n that is lexicographically minimal among all of its cyclic rotations.

			The a(3) = 1 through a(6) = 19 compositions:
  (21)  (31)   (32)    (42)
        (121)  (41)    (51)
        (211)  (131)   (141)
               (212)   (213)
               (221)   (231)
               (311)   (312)
               (1121)  (321)
               (1211)  (411)
               (2111)  (1131)
                       (1221)
                       (1311)
                       (2112)
                       (2121)
                       (2211)
                       (3111)
                       (11121)
                       (11211)
                       (12111)
                       (21111)

Numbers whose prime signature is not a necklace are A329142.
Binary necklaces are A000031.
Necklace compositions are A008965.
Lyndon compositions are A059966.
Numbers whose reversed binary expansion is a necklace are A328595.
Cf. A000740, A001037, A019536, A070211, A178472, A318731, A329138, A329141.

neckQ[q_]:=Array[OrderedQ[{q,RotateRight[q,#]}]&,Length[q]-1,1,And];
Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],!neckQ[#]&]],{n,10}]

a(n) = 2^(n-1) - A008965(n).

A342194 Number of strict compositions of n with equal differences, or strict arithmetic progressions summing to n.

Original entry on oeis.org

1, 1, 1, 3, 3, 5, 7, 7, 7, 13, 11, 11, 17, 13, 15, 25, 17, 17, 29, 19, 23, 35, 25, 23, 39, 29, 29, 45, 33, 29, 55, 31, 35, 55, 39, 43, 65, 37, 43, 65, 51, 41, 77, 43, 51, 85, 53, 47, 85, 53, 65, 87, 61, 53, 99, 67, 67, 97, 67, 59, 119, 61, 71, 113, 75, 79, 123, 67, 79, 117

Offset: 0

Gus Wiseman, Apr 02 2021

nonn

			The a(1) = 1 through a(9) = 13 compositions:
  (1)  (2)  (3)    (4)    (5)    (6)      (7)    (8)    (9)
            (1,2)  (1,3)  (1,4)  (1,5)    (1,6)  (1,7)  (1,8)
            (2,1)  (3,1)  (2,3)  (2,4)    (2,5)  (2,6)  (2,7)
                          (3,2)  (4,2)    (3,4)  (3,5)  (3,6)
                          (4,1)  (5,1)    (4,3)  (5,3)  (4,5)
                                 (1,2,3)  (5,2)  (6,2)  (5,4)
                                 (3,2,1)  (6,1)  (7,1)  (6,3)
                                                        (7,2)
                                                        (8,1)
                                                        (1,3,5)
                                                        (2,3,4)
                                                        (4,3,2)
                                                        (5,3,1)

Wikipedia, Arithmetic progression.
Gus Wiseman, Sequences counting and ranking integer partitions by the differences of their successive parts.

Strict compositions in general are counted by A032020.
The unordered version is A049980.
The non-strict version is A175342.
A000203 adds up divisors.
A000726 counts partitions with alternating parts unequal.
A003242 counts anti-run compositions.
A224958 counts compositions with alternating parts unequal.
A342343 counts compositions with alternating parts strictly decreasing.
A342495 counts compositions with constant quotients.
A342527 counts compositions with alternating parts equal.
Cf. A000009, A001522, A002843, A049988, A062968, A070211, A114921, A325545, A325557, A342496, A342515, A342522.

Table[Length[Select[Join@@Permutations/@Select[IntegerPartitions[n],UnsameQ@@#&],SameQ@@Differences[#]&]],{n,0,30}]

a(n > 0) = A175342(n) - A000005(n) + 1.

a(n > 0) = 2*A049988(n) - 2*A000005(n) + 1 = 2*A049982(n) + 1.

cp's OEIS Frontend

A325549 Number of necklace compositions of n with distinct circular differences.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A068322 Number of arithmetic progressions of positive odd integers, strictly increasing with sum n.

Views

Author

Keywords

Examples

Links

Crossrefs

Formula

A325552 Number of compositions of n with distinct differences up to sign.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Extensions

A342532 Number of even-length compositions of n with alternating parts distinct.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

Extensions

A328025 Irregular triangle read by rows where row n gives the differences between consecutive divisors of n in weakly decreasing order.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

A328027 Irregular triangle read by rows where row n lists, in weakly increasing order, the differences between consecutive divisors of n.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

A329145 Number of non-necklace compositions of n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A342194 Number of strict compositions of n with equal differences, or strict arithmetic progressions summing to n.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Mathematica

Formula