A152061 -id:A152061 - cp's OEIS frontend

A027375 Number of aperiodic binary strings of length n; also number of binary sequences with primitive period n.

0, 2, 2, 6, 12, 30, 54, 126, 240, 504, 990, 2046, 4020, 8190, 16254, 32730, 65280, 131070, 261576, 524286, 1047540, 2097018, 4192254, 8388606, 16772880, 33554400, 67100670, 134217216, 268419060, 536870910, 1073708010, 2147483646, 4294901760

Offset: 0

N. J. A. Sloane

A sequence S is aperiodic if it is not of the form S = T^k with k>1. - N. J. A. Sloane, Oct 26 2012
Equivalently, number of output sequences with primitive period n from a simple cycling shift register. - Frank Ruskey, Jan 17 2000
Also, the number of nonempty subsets A of the set of the integers 1 to n such that gcd(A) is relatively prime to n (for n>1). - R. J. Mathar, Aug 13 2006; range corrected by Geoffrey Critzer, Dec 07 2014
Without the first term, this sequence is the Moebius transform of 2^n (n>0). For n > 0, a(n) is also the number of periodic points of period n of the transform associated to the Kolakoski sequence A000002. This transform changes a sequence of 1's and 2's by the sequence of the lengths of its runs. The Kolakoski sequence is one of the two fixed points of this transform, the other being the same sequence without the initial term. A025142 and A025143 are the 2 periodic points of period 2. A001037(n) = a(n)/n gives the number of orbits of size n. - Jean-Christophe Hervé, Oct 25 2014
From Bernard Schott, Jun 19 2019: (Start)
There are 2^n strings of length n that can be formed from the symbols 0 and 1; in the example below with a(3) = 6, the last two strings that are not aperiodic binary strings are { 000, 111 }, corresponding to 0^3 and 1^3, using the notation of the first comment.
Two properties mentioned by Krusemeyer et al. are:
1) For any n > 2, a(n) is divisible by 6.
2) Lim_{n->oo} a(n+1)/a(n) = 2. (End)

			a(3) = 6 = |{ 001, 010, 011, 100, 101, 110 }|. - corrected by _Geoffrey Critzer_, Dec 07 2014

J.-P. Allouche and J. Shallit, Automatic Sequences, Cambridge Univ. Press, 2003, p. 13. - From N. J. A. Sloane, Oct 26 2012
E. R. Berlekamp, Algebraic Coding Theory, McGraw-Hill, NY, 1968, p. 84.
Blanchet-Sadri, Francine. Algorithmic combinatorics on partial words. Chapman & Hall/CRC, Boca Raton, FL, 2008. ii+385 pp. ISBN: 978-1-4200-6092-8; 1-4200-6092-9 MR2384993 (2009f:68142). See p. 164.
S. W. Golomb, Shift-Register Sequences, Holden-Day, San Francisco, 1967.
Mark I. Krusemeyer, George T. Gilbert, Loren C. Larson, A Mathematical Orchard, Problems and Solutions, MAA, 2012, Problem 128, pp. 225-227.

T. D. Noe, Table of n, a(n) for n = 0..300
J.-P. Allouche, Note on the transcendence of a generating function. In A. Laurincikas and E. Manstavicius, editors, Proceedings of the Palanga Conference for the 75th birthday of Prof. Kubilius, New trends in Probab. and Statist., Vol. 4, pages 461-465, 1997.
B. Chaffin, J. P. Linderman, N. J. A. Sloane and Allan Wilks, On Curling Numbers of Integer Sequences, arXiv:1212.6102 [math.CO], Dec 25 2012.
B. Chaffin, J. P. Linderman, N. J. A. Sloane and Allan Wilks, On Curling Numbers of Integer Sequences, Journal of Integer Sequences, Vol. 16 (2013), Article 13.4.3.
John D. Cook, Counting primitive bit strings (2014).
P. Flajolet and R. Sedgewick, Analytic Combinatorics, 2009; see page 85.
Guilhem Gamard, Gwenaël Richomme, Jeffrey Shallit and Taylor J. Smith, Periodicity in rectangular arrays, arXiv:1602.06915 [cs.DM], 2016; Information Processing Letters 118 (2017) 58-63. See Table 1.
O. Georgiou, C. P. Dettmann and E. G. Altmann, Faster than expected escape for a class of fully chaotic maps, arXiv preprint arXiv:1207.7000 [nlin.CD], 2012. - From _N. J. A. Sloane_, Dec 23 2012
E. N. Gilbert and J. Riordan, Symmetry types of periodic sequences, Illinois J. Math., 5 (1961), 657-665.
David W. Lyons, Cristina Mullican, Adam Rilatt, and Jack D. Putnam, Werner states from diagrams, arXiv:2302.05572 [quant-ph], 2023.
Robert M. May, Simple mathematical models with very complicated dynamics, Nature, Vol. 261, June 10, 1976, pp. 459-467; reprinted in The Theory of Chaotic Attractors, pp. 85-93. Springer, New York, NY, 2004. The sequences listed in Table 2 are A000079, A027375, A000031, A001037, A000048, A051841. - _N. J. A. Sloane_, Mar 17 2019
M. B. Nathanson, Primitive sets and Euler phi function for subsets of {1,2,...,n}, arXiv:math/0608150 [math.NT], 2006-2007.
P. Pongsriiam, Relatively Prime Sets, Divisor Sums, and Partial Sums, arXiv:1306.4891 [math.NT], 2013 and J. Int. Seq. 16 (2013) #13.9.1.
P. Pongsriiam, A remark on relative prime sets, arXiv:1306.2529 [math.NT], 2013.
P. Pongsriiam, A remark on relative prime sets, Integers 13 (2013), A49.
R. C. Read, Combinatorial problems in the theory of music, Disc. Math. 167/168 (1997) 543-551, sequence A(n).
M. Tang, Relatively Prime Sets and a Phi Function for Subsets of {1, 2, ... , n}, J. Int. Seq. 13 (2010) # 10.7.6.
László Tóth, Menon-type identities concerning subsets of the set {1,2,...,n}, arXiv:2109.06541 [math.NT], 2021.

A038199 and A056267 are essentially the same sequence with different initial terms.
Cf. A020921, A216953.
Column k=2 of A143324.

a027375 n = n * a001037 n  -- Reinhard Zumkeller, Feb 01 2013

with(numtheory): A027375 :=n->add( mobius(d)*2^(n/d), d = divisors(n)); # N. J. A. Sloane, Sep 25 2012

Table[ Apply[ Plus, MoebiusMu[ n / Divisors[n] ]*2^Divisors[n] ], {n, 1, 32} ]
a[0]=0; a[n_] := DivisorSum[n, MoebiusMu[n/#]*2^#&]; Array[a, 40, 0] (* Jean-François Alcover, Dec 01 2015 *)

PARI
```
a(n) = sumdiv(n,d,moebius(n\d)*2^d);
```

from sympy import mobius, divisors
def a(n): return sum(mobius(d)*2**(n//d) for d in divisors(n))
print([a(n) for n in range(101)]) # Indranil Ghosh, Jun 28 2017

a(n) = Sum_{d|n} mu(d)*2^(n/d).
a(n) = 2*A000740(n).
a(n) = n*A001037(n).
Sum_{d|n} a(n) = 2^n.
a(p) = 2^p - 2 for p prime. - R. J. Mathar, Aug 13 2006
a(n) = 2^n - O(2^(n/2)). - Charles R Greathouse IV, Apr 28 2016
a(n) = 2^n - A152061(n). - Bernard Schott, Jun 20 2019
G.f.: 2 * Sum_{k>=1} mu(k)*x^k/(1 - 2*x^k). - Ilya Gutkovskiy, Nov 11 2019

A178472 Number of compositions (ordered partitions) of n where the gcd of the part sizes is not 1.

Original entry on oeis.org

0, 1, 1, 2, 1, 5, 1, 8, 4, 17, 1, 38, 1, 65, 19, 128, 1, 284, 1, 518, 67, 1025, 1, 2168, 16, 4097, 256, 8198, 1, 16907, 1, 32768, 1027, 65537, 79, 133088, 1, 262145, 4099, 524408, 1, 1056731, 1, 2097158, 16636, 4194305, 1, 8421248, 64, 16777712, 65539

Offset: 1

Franklin T. Adams-Watters, May 28 2010

nonn

Of course, all part sizes must be greater than 1; that condition alone gives the Fibonacci numbers, which is thus an upper bound.

Also the number of periodic compositions of n, where a sequence is periodic if its cyclic rotations are not all different. Also compositions with non-relatively prime run-lengths. - Gus Wiseman, Nov 10 2019

			For n=6, we have 5 compositions: <6>, <4,2>, <2,4>, <2,2,2>, and <3,3>.
From _Gus Wiseman_, Nov 10 2019: (Start)
The a(2) = 1 through a(9) = 4 non-relatively prime compositions:
  (2)  (3)  (4)    (5)  (6)      (7)  (8)        (9)
            (2,2)       (2,4)         (2,6)      (3,6)
                        (3,3)         (4,4)      (6,3)
                        (4,2)         (6,2)      (3,3,3)
                        (2,2,2)       (2,2,4)
                                      (2,4,2)
                                      (4,2,2)
                                      (2,2,2,2)
The a(2) = 1 through a(9) = 4 periodic compositions:
  11  111  22    11111  33      1111111  44        333
           1111         222              1313      121212
                        1212             2222      212121
                        2121             3131      111111111
                        111111           112112
                                         121121
                                         211211
                                         11111111
The a(2) = 1 through a(9) = 4 compositions with non-relatively prime run-lengths:
  11  111  22    11111  33      1111111  44        333
           1111         222              1133      111222
                        1122             2222      222111
                        2211             3311      111111111
                        111111           111122
                                         112211
                                         221111
                                         11111111
(End)

Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Hunki Baek, Sejeong Bang, Dongseok Kim, and Jaeun Lee, A bijection between aperiodic palindromes and connected circulant graphs, arXiv:1412.2426 [math.CO], 2014. See Table 2.

Cf. A000045, A008683, A011782, A178470.
Periodic binary words are A152061.
Cf. A000740, A027375, A059966, A121016, A329140, A329145.

A178472 := n -> (2^n - add(mobius(n/d)*2^d, d in divisors(n)))/2:
seq(A178472(n), n=1..51); # Peter Luschny, Jan 21 2018

Table[2^(n - 1) - DivisorSum[n, MoebiusMu[n/#]*2^(# - 1) &], {n, 51}] (* Michael De Vlieger, Jan 20 2018 *)

vector(60,n,2^(n-1)-sumdiv(n,d,2^(d-1)*moebius(n/d)))

from sympy import mobius, divisors
def A178472(n): return -sum(mobius(n//d)<Chai Wah Wu, Sep 21 2024

a(n) = Sum_{d|n & d

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

a(n) = A152061(n)/2. - George Beck, Jan 20 2018

a(p) = 1 for p prime. - Chai Wah Wu, Sep 21 2024

Ambiguous term a(0) removed by Max Alekseyev, Jan 02 2012

A329140 Numbers whose prime signature is a periodic word.

Original entry on oeis.org

6, 10, 14, 15, 21, 22, 26, 30, 33, 34, 35, 36, 38, 39, 42, 46, 51, 55, 57, 58, 62, 65, 66, 69, 70, 74, 77, 78, 82, 85, 86, 87, 91, 93, 94, 95, 100, 102, 105, 106, 110, 111, 114, 115, 118, 119, 122, 123, 129, 130, 133, 134, 138, 141, 142, 143, 145, 146, 154

Offset: 1

Gus Wiseman, Nov 09 2019

nonn

First differs from A182853 in having 2100 = 2^2 * 3^1 * 5^2 * 7^1.
A number's prime signature (A124010) is the sequence of positive exponents in its prime factorization.
A sequence is aperiodic if its cyclic rotations are all different.

			The sequence of terms together with their prime signatures begins:
   6: (1,1)
  10: (1,1)
  14: (1,1)
  15: (1,1)
  21: (1,1)
  22: (1,1)
  26: (1,1)
  30: (1,1,1)
  33: (1,1)
  34: (1,1)
  35: (1,1)
  36: (2,2)
  38: (1,1)
  39: (1,1)
  42: (1,1,1)
  46: (1,1)
  51: (1,1)
  55: (1,1)
  57: (1,1)
  58: (1,1)

Complement of A329139.
Periodic compositions are A178472.
Periodic binary words are A152061.
Numbers whose binary expansion is periodic are A121016.
Numbers whose prime signature is a Lyndon word are A329131.
Numbers whose prime signature is a necklace are A329138.
Cf. A025487, A056239, A097318, A112798, A118914, A124010, A181819, A304678, A329132 A329134, A329143, A329144.

aperQ[q_]:=Array[RotateRight[q,#1]&,Length[q],1,UnsameQ];
Select[Range[100],!aperQ[Last/@FactorInteger[#]]&]

A329134 Numbers whose differences of prime indices are a periodic word.

Original entry on oeis.org

8, 16, 27, 30, 32, 64, 81, 105, 110, 125, 128, 180, 210, 238, 243, 256, 273, 343, 385, 450, 506, 512, 625, 627, 729, 806, 935, 1001, 1024, 1080, 1100, 1131, 1155, 1331, 1394, 1495, 1575, 1729, 1786, 1870, 1887, 2048, 2187, 2197, 2310, 2401, 2431, 2451, 2635

Offset: 1

Gus Wiseman, Nov 09 2019

nonn

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.

A sequence is periodic if its cyclic rotations are not all different.

			The sequence of terms together with their differences of prime indices begins:
     8: (0,0)
    16: (0,0,0)
    27: (0,0)
    30: (1,1)
    32: (0,0,0,0)
    64: (0,0,0,0,0)
    81: (0,0,0)
   105: (1,1)
   110: (2,2)
   125: (0,0)
   128: (0,0,0,0,0,0)
   180: (0,1,0,1)
   210: (1,1,1)
   238: (3,3)
   243: (0,0,0,0)
   256: (0,0,0,0,0,0,0)
   273: (2,2)
   343: (0,0)
   385: (1,1)
   450: (1,0,1,0)

Complement of A329135.
These are the Heinz numbers of the partitions counted by A329144.
Periodic binary words are A152061.
Periodic compositions are A178472.
Numbers whose binary expansion is periodic are A121016.
Numbers whose prime signature is periodic are A329140.
Cf. A000740, A027375, A056239, A112798, A124010, A328594, A329132, A329139.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
aperQ[q_]:=Array[RotateRight[q,#1]&,Length[q],1,UnsameQ];
Select[Range[10000],!aperQ[Differences[primeMS[#]]]&]

A329135 Numbers whose differences of prime indices are an aperiodic word.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 9, 10, 11, 12, 13, 14, 15, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 28, 29, 31, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 65, 66, 67, 68, 69, 70, 71, 72, 73

Offset: 1

Gus Wiseman, Nov 09 2019

nonn

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.

A sequence is aperiodic if its cyclic rotations are all different.

			The sequence of terms together with their differences of prime indices begins:
    1: ()
    2: ()
    3: ()
    4: (0)
    5: ()
    6: (1)
    7: ()
    9: (0)
   10: (2)
   11: ()
   12: (0,1)
   13: ()
   14: (3)
   15: (1)
   17: ()
   18: (1,0)
   19: ()
   20: (0,2)
   21: (2)
   22: (4)

Complement of A329134.
These are the Heinz numbers of the partitions counted by A329137.
Aperiodic compositions are A000740.
Aperiodic binary words are A027375.
Numbers whose binary expansion is aperiodic are A328594.
Numbers whose prime signature is aperiodic are A329139.
Cf. A056239, A112798, A124010, A152061, A329133, A329136, A329140.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
aperQ[q_]:=Array[RotateRight[q,#1]&,Length[q],1,UnsameQ];
Select[Range[100],aperQ[Differences[primeMS[#]]]&]

A329132 Numbers whose augmented differences of prime indices are a periodic sequence.

Original entry on oeis.org

4, 8, 15, 16, 32, 55, 64, 90, 105, 119, 128, 225, 253, 256, 403, 512, 540, 550, 697, 893, 935, 1024, 1155, 1350, 1357, 1666, 1943, 2048, 2263, 3025, 3071, 3150, 3240, 3375, 3451, 3927, 3977, 4096, 4429, 5123, 5500, 5566, 6731, 7735, 8083, 8100, 8192, 9089

Offset: 1

Gus Wiseman, Nov 06 2019

nonn

The augmented differences aug(y) of an integer partition y of length k are given by aug(y)i = y_i - y{i + 1} + 1 if i < k and aug(y)_k = y_k. For example, aug(6,5,5,3,3,3) = (2,1,3,1,1,3).
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.
A sequence is periodic if its cyclic rotations are not all different.

			The sequence of terms together with their augmented differences of prime indices begins:
     4: (1,1)
     8: (1,1,1)
    15: (2,2)
    16: (1,1,1,1)
    32: (1,1,1,1,1)
    55: (3,3)
    64: (1,1,1,1,1,1)
    90: (2,1,2,1)
   105: (2,2,2)
   119: (4,4)
   128: (1,1,1,1,1,1,1)
   225: (1,2,1,2)
   253: (5,5)
   256: (1,1,1,1,1,1,1,1)
   403: (6,6)
   512: (1,1,1,1,1,1,1,1,1)
   540: (2,1,1,2,1,1)
   550: (3,1,3,1)
   697: (7,7)
   893: (8,8)

Complement of A329133.
These are the Heinz numbers of the partitions counted by A329143.
Periodic binary words are A152061.
Periodic compositions are A178472.
Numbers whose binary expansion is periodic are A121016.
Numbers whose prime signature is periodic are A329140.
Numbers whose differences of prime indices are periodic are A329134.
Cf. A000961, A027375, A056239, A112798, A325356, A325389, A325394, A328594, A329135, A329136, A329139.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
aperQ[q_]:=Array[RotateRight[q,#1]&,Length[q],1,UnsameQ];
aug[y_]:=Table[If[i

A329136 Number of integer partitions of n whose augmented differences are an aperiodic word.

Original entry on oeis.org

1, 1, 1, 2, 4, 5, 10, 14, 19, 28, 40, 53, 75, 99, 131, 172, 226, 294, 380, 488, 617, 787, 996, 1250, 1565, 1953, 2425, 3003, 3705, 4559, 5589, 6836, 8329, 10132, 12292, 14871, 17950, 21629, 25988, 31169, 37306, 44569, 53139, 63247, 75133, 89111, 105515, 124737

Offset: 0

Gus Wiseman, Nov 09 2019

nonn

The augmented differences aug(y) of an integer partition y of length k are given by aug(y)i = y_i - y{i + 1} + 1 if i < k and aug(y)_k = y_k. For example, aug(6,5,5,3,3,3) = (2,1,3,1,1,3).

A sequence is aperiodic if its cyclic rotations are all different.

			The a(1) = 1 through a(7) = 14 partitions:
  (1)  (2)  (3)    (4)      (5)        (6)          (7)
            (2,1)  (2,2)    (4,1)      (3,3)        (4,3)
                   (3,1)    (2,2,1)    (4,2)        (5,2)
                   (2,1,1)  (3,1,1)    (5,1)        (6,1)
                            (2,1,1,1)  (2,2,2)      (3,2,2)
                                       (3,2,1)      (3,3,1)
                                       (4,1,1)      (4,2,1)
                                       (2,2,1,1)    (5,1,1)
                                       (3,1,1,1)    (2,2,2,1)
                                       (2,1,1,1,1)  (3,2,1,1)
                                                    (4,1,1,1)
                                                    (2,2,1,1,1)
                                                    (3,1,1,1,1)
                                                    (2,1,1,1,1,1)
With augmented differences:
  (1)  (2)  (3)    (4)      (5)        (6)          (7)
            (2,1)  (1,2)    (4,1)      (1,3)        (2,3)
                   (3,1)    (1,2,1)    (3,2)        (4,2)
                   (2,1,1)  (3,1,1)    (5,1)        (6,1)
                            (2,1,1,1)  (1,1,2)      (1,3,1)
                                       (2,2,1)      (2,1,2)
                                       (4,1,1)      (3,2,1)
                                       (1,2,1,1)    (5,1,1)
                                       (3,1,1,1)    (1,1,2,1)
                                       (2,1,1,1,1)  (2,2,1,1)
                                                    (4,1,1,1)
                                                    (1,2,1,1,1)
                                                    (3,1,1,1,1)
                                                    (2,1,1,1,1,1)

The Heinz numbers of these partitions are given by A329133.
The periodic version is A329143.
The non-augmented version is A329137.
Aperiodic binary words are A027375.
Aperiodic compositions are A000740.
Numbers whose binary expansion is aperiodic are A328594.
Numbers whose differences of prime indices are aperiodic are A329135.
Numbers whose prime signature is aperiodic are A329139.
Cf. A152061, A325351, A325356, A329132, A329134, A329139, A329140.

aperQ[q_]:=Array[RotateRight[q,#1]&,Length[q],1,UnsameQ];
aug[y_]:=Table[If[i

a(n) + A329143(n) = A000041(n).

A329133 Numbers whose augmented differences of prime indices are an aperiodic sequence.

Original entry on oeis.org

1, 2, 3, 5, 6, 7, 9, 10, 11, 12, 13, 14, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 56, 57, 58, 59, 60, 61, 62, 63, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74

Offset: 1

Gus Wiseman, Nov 09 2019

nonn

The augmented differences aug(y) of an integer partition y of length k are given by aug(y)i = y_i - y{i + 1} + 1 if i < k and aug(y)_k = y_k. For example, aug(6,5,5,3,3,3) = (2,1,3,1,1,3).
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.
A finite sequence is aperiodic if its cyclic rotations are all different.

			The sequence of terms together with their augmented differences of prime indices begins:
    1: ()
    2: (1)
    3: (2)
    5: (3)
    6: (2,1)
    7: (4)
    9: (1,2)
   10: (3,1)
   11: (5)
   12: (2,1,1)
   13: (6)
   14: (4,1)
   17: (7)
   18: (1,2,1)
   19: (8)
   20: (3,1,1)
   21: (3,2)
   22: (5,1)
   23: (9)
   24: (2,1,1,1)

Complement of A329132.
These are the Heinz numbers of the partitions counted by A329136.
Aperiodic binary words are A027375.
Aperiodic compositions are A000740.
Numbers whose binary expansion is aperiodic are A328594.
Numbers whose prime signature is aperiodic are A329139.
Numbers whose differences of prime indices are aperiodic are A329135.
Cf. A056239, A112798, A121016, A124010, A152061, A246029, A325351, A325389, A329134, A329140.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
aperQ[q_]:=Array[RotateRight[q,#1]&,Length[q],1,UnsameQ];
aug[y_]:=Table[If[i

A329143 Number of integer partitions of n whose augmented differences are a periodic word.

Original entry on oeis.org

0, 0, 1, 1, 1, 2, 1, 1, 3, 2, 2, 3, 2, 2, 4, 4, 5, 3, 5, 2, 10, 5, 6, 5, 10, 5, 11, 7, 13, 6, 15, 6, 20, 11, 18, 12, 27, 8, 27, 16, 32, 14, 35, 14, 42, 23, 43, 17, 56, 17, 61, 31, 67, 25, 78, 28, 88, 41, 89, 35, 119, 39, 116, 60, 131, 52, 154, 52, 170, 75, 182

Offset: 0

Gus Wiseman, Nov 10 2019

nonn

The augmented differences aug(y) of an integer partition y of length k are given by aug(y)i = y_i - y{i + 1} + 1 if i < k and aug(y)_k = y_k. For example, aug(6,5,5,3,3,3) = (2,1,3,1,1,3).

A finite sequence is periodic if its cyclic rotations are not all different.

			The a(n) partitions for n = 2, 5, 8, 14, 16, 22:
  11  32     53        95              5533              7744
      11111  3221      5432            7441              9652
             11111111  32222111        533311            554332
                       11111111111111  33222211          54333211
                                       1111111111111111  332222221111
                                                         1111111111111111111111

The Heinz numbers of these partitions are given by A329132.
The aperiodic version is A329136.
The non-augmented version is A329144.
Periodic binary words are A152061.
Periodic compositions are A178472.
Numbers whose binary expansion is periodic are A121016.
Numbers whose prime signature is periodic are A329140.
Cf. A000740, A027375, A328594, A329133, A329135, A325351, A325356, A329134.

aperQ[q_]:=Array[RotateRight[q,#1]&,Length[q],1,UnsameQ];
aug[y_]:=Table[If[i

a(n) + A329136(n) = A000041(n).

More terms from Jinyuan Wang, Jun 27 2020

A329144 Number of integer partitions of n whose differences are a periodic word.

Original entry on oeis.org

0, 0, 1, 1, 1, 3, 1, 2, 5, 3, 2, 8, 2, 5, 9, 7, 5, 12, 7, 7, 19, 9, 9, 21, 12, 15, 23, 18, 17, 29, 21, 19, 42, 23, 31, 42, 38, 29, 53, 43, 44, 62, 49, 52, 79, 55, 72, 75, 87, 63, 117, 79, 104, 107, 120, 99, 156, 117, 143, 147

Offset: 1

Gus Wiseman, Nov 10 2019

nonn

A finite sequence is periodic if its cyclic rotations are not all different.

			The a(n) partitions for n = 3, 6, 8, 9, 12, 15, 16:
  111  222     2222      333        444           555              4444
       321     11111111  432        543           654              7531
       111111            531        642           753              44332
                         32211      741           852              3332221
                         111111111  3333          951              4332211
                                    222222        33333            22222222
                                    3222111       54321            1111111111111111
                                    111111111111  322221111
                                                  111111111111111

The Heinz numbers of these partitions are given by A329134.
The augmented version is A329143.
Periodic binary words are A152061.
Periodic compositions are A178472.
Numbers whose binary expansion is periodic are A121016.
Numbers whose prime signature is periodic are A329140.
Cf. A000740, A027375, A059966, A328594, A328596, A329132, A329135, A329136.

aperQ[q_]:=Array[RotateRight[q,#1]&,Length[q],1,UnsameQ];
Table[Length[Select[IntegerPartitions[n],!aperQ[Differences[#]]&]],{n,30}]

Showing 1-10 of 13 results. Next

cp's OEIS Frontend

A027375 Number of aperiodic binary strings of length n; also number of binary sequences with primitive period n.

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

Haskell

Maple

Mathematica

PARI

Python

Formula

A178472 Number of compositions (ordered partitions) of n where the gcd of the part sizes is not 1.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

PARI

Python

Formula

Extensions

A329140 Numbers whose prime signature is a periodic word.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A329134 Numbers whose differences of prime indices are a periodic word.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A329135 Numbers whose differences of prime indices are an aperiodic word.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A329132 Numbers whose augmented differences of prime indices are a periodic sequence.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A329136 Number of integer partitions of n whose augmented differences are an aperiodic word.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A329133 Numbers whose augmented differences of prime indices are an aperiodic sequence.

Views