A124758 -id:A124758 - cp's OEIS frontend

A333768 Minimum part of the n-th composition in standard order. a(0) = 0.

0, 1, 2, 1, 3, 1, 1, 1, 4, 1, 2, 1, 1, 1, 1, 1, 5, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 6, 1, 2, 1, 3, 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 7, 1, 2, 1, 3, 1, 1, 1, 3, 1, 2, 1, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 1

Offset: 0

Gus Wiseman, Apr 06 2020

nonn

One plus the shortest run of 0's after a 1 in the binary expansion of n > 0.

A composition of n is a finite sequence of positive integers summing to n. The k-th composition in standard order (row k of A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

			The 148th composition in standard order is (3,2,3), so a(148) = 2.

Positions of first appearances (ignoring index 0) are A000079.
Positions of terms > 1 are A022340.
The version for prime indices is A055396.
The  maximum part is given by A333766.
All of the following pertain to compositions in standard order (A066099):
- Length is A000120.
- Compositions without 1's are A022340.
- Sum is A070939.
- Product is A124758.
- Runs are counted by A124767.
- Strict compositions are A233564.
- Constant compositions are A272919.
- Runs-resistance is A333628.
- Weakly decreasing compositions are A114994.
- Weakly increasing compositions are A225620.
- Strictly decreasing compositions are A333255.
- Strictly increasing compositions are A333256.
Cf. A029931, A048793, A087117, A228351, A328594, A333217, A333218, A333219, A333632, A333767.

stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Table[If[n==0,0,Min@@stc[n]],{n,0,100}]

For n > 0, a(n) = A333767(n) + 1.

A335238 Numbers k such that the distinct parts of the k-th composition in standard order (A066099) are not pairwise coprime, where a singleton is not coprime unless it is (1).

Original entry on oeis.org

0, 2, 4, 8, 10, 16, 32, 34, 36, 40, 42, 64, 69, 70, 81, 88, 98, 104, 128, 130, 136, 138, 139, 141, 142, 160, 162, 163, 168, 170, 177, 184, 197, 198, 209, 216, 226, 232, 256, 260, 261, 262, 274, 276, 277, 278, 279, 282, 283, 285, 286, 288, 290, 292, 296, 321

Offset: 1

Gus Wiseman, May 28 2020

nonn

We use the Mathematica definition for CoprimeQ, so a singleton is not considered coprime unless it is (1).

The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

			The sequence together with the corresponding compositions begins:
    0: ()          88: (2,1,4)      177: (2,1,4,1)
    2: (2)         98: (1,4,2)      184: (2,1,1,4)
    4: (3)        104: (1,2,4)      197: (1,4,2,1)
    8: (4)        128: (8)          198: (1,4,1,2)
   10: (2,2)      130: (6,2)        209: (1,2,4,1)
   16: (5)        136: (4,4)        216: (1,2,1,4)
   32: (6)        138: (4,2,2)      226: (1,1,4,2)
   34: (4,2)      139: (4,2,1,1)    232: (1,1,2,4)
   36: (3,3)      141: (4,1,2,1)    256: (9)
   40: (2,4)      142: (4,1,1,2)    260: (6,3)
   42: (2,2,2)    160: (2,6)        261: (6,2,1)
   64: (7)        162: (2,4,2)      262: (6,1,2)
   69: (4,2,1)    163: (2,4,1,1)    274: (4,3,2)
   70: (4,1,2)    168: (2,2,4)      276: (4,2,3)
   81: (2,4,1)    170: (2,2,2,2)    277: (4,2,2,1)

The complement is A333228.
Not ignoring repeated parts gives A335239.
Singleton or pairwise coprime partitions are counted by A051424.
Singleton or pairwise coprime sets are ranked by A087087.
Coprime partitions are counted by A327516.
Non-coprime partitions are counted by A335240.
All of the following pertain to compositions in standard order (A066099):
- Length is A000120.
- Sum is A070939.
- Product is A124758.
- Reverse is A228351
- GCD is A326674.
- Heinz number is A333219.
- LCM is A333226.
- Coprime compositions are A333227.
- Compositions whose distinct parts are coprime are A333228.
- Number of distinct parts is A334028.
Cf. A007360, A048793, A101268, A291166, A302569, A326675, A335235, A335236, A335237.

stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Select[Range[0,100],!CoprimeQ@@Union[stc[#]]&]

A011965 Second differences of Bell numbers.

Original entry on oeis.org

1, 2, 7, 27, 114, 523, 2589, 13744, 77821, 467767, 2972432, 19895813, 139824045, 1028804338, 7905124379, 63287544055, 526827208698, 4551453462543, 40740750631417, 377254241891064, 3608700264369193, 35613444194346451, 362161573323083920, 3790824599495473121

Offset: 0

N. J. A. Sloane

Number of partitions of n+3 with at least one singleton and with the smallest element in a singleton equal to 3. Alternatively, number of partitions of n+3 with at least one singleton and with the largest element in a singleton equal to n+1. - Olivier GERARD, Oct 29 2007

Out of the A005493(n) set partitions with a specific two elements clustered separately, number that have a different set of two elements clustered separately. - Andrey Goder (andy.goder(AT)gmail.com), Dec 17 2007

Olivier Gérard and Karol A. Penson, A budget of set partition statistics, in preparation, unpublished as of Sep 22 2011.

Chai Wah Wu, Table of n, a(n) for n = 0..570(terms 0..250 from Alois P. Heinz).
Martin Cohn, Shimon Even, Karl Menger, Jr. and Philip K. Hooper, On the Number of Partitionings of a Set of n Distinct Objects, Amer. Math. Monthly 69 (1962), no. 8, 782--785. MR1531841.
Martin Cohn, Shimon Even, Karl Menger, Jr. and Philip K. Hooper, On the Number of Partitionings of a Set of n Distinct Objects, Amer. Math. Monthly 69 (1962), no. 8, 782--785. MR1531841. [Annotated scanned copy]
Adam M. Goyt and Lara K. Pudwell, Avoiding colored partitions of two elements in the pattern sense, arXiv preprint arXiv:1203.3786 [math.CO], 2012.
Jocelyn Quaintance and Harris Kwong, A combinatorial interpretation of the Catalan and Bell number difference tables, Integers, 13 (2013), #A29.

Cf. A000110, A005493, A106436.

Similar recurrences: A006014, A090365, A124758, A217924, A243499, A284005, A290615, A329369, A341392, A347204, A347205, A350309.

[Bell(n+2) -2*Bell(n+1) + Bell(n): n in [0..40]]; // G. C. Greubel, Jan 07 2025

a:= n-> add((-1)^k*binomial(2,k)*combinat['bell'](n+k), k=0..2): seq(a(n), n=0..20);  # Alois P. Heinz, Sep 05 2008

Differences[BellB[Range[0, 30]], 2] (* Vladimir Joseph Stephan Orlovsky, May 25 2011 *)

# requires python 3.2 or higher. Otherwise use def'n of accumulate in python docs.
from itertools import accumulate
A011965_list, blist, b = [1], [1, 2], 2
for _ in range(1000):
    blist = list(accumulate([b]+blist))
    b = blist[-1]
    A011965_list.append(blist[-3])
# Chai Wah Wu, Sep 02 2014

# or Sagemath
b=bell_number
print([b(n+2) -2*b(n+1) +b(n) for n in range(41)]) # G. C. Greubel, Jan 07 2025

a(n) = A005493(n) - A005493(n-1).
E.g.f.: exp(exp(x)-1)*(exp(2*x)-exp(x)+1). - Vladeta Jovovic, Feb 11 2003
a(n) = A000110(n) - 2*A000110(n-1) + A000110(n-2). - Andrey Goder (andy.goder(AT)gmail.com), Dec 17 2007
G.f.: G(0) where G(k) = 1 - 2*x*(k+1)/((2*k+1)*(2*x*k+2*x-1) - x*(2*k+1)*(2*k+3)*(2*x*k+2*x-1)/(x*(2*k+3) - 2*(k+1)*(2*x*k+3*x-1)/G(k+1) )); (recursively defined continued fraction). - Sergei N. Gladkovskii, Dec 19 2012
G.f.: 1 - G(0) where G(k) = 1 - 1/(1-k*x-2*x)/(1-x/(x-1/G(k+1) )); (recursively defined continued fraction). - Sergei N. Gladkovskii, Jan 17 2013
G.f.: 1 - 1/x + (1-x)^2/x/(G(0)-x) where G(k) = 1 - x*(k+1)/(1 - x/G(k+1) ); (recursively defined continued fraction). - Sergei N. Gladkovskii, Jan 26 2013
G.f.: G(0)*(1-1/x) where G(k) = 1 - 1/(1-x*(k+1))/(1-x/(x-1/G(k+1) )); (recursively defined continued fraction). - Sergei N. Gladkovskii, Feb 07 2013
a(n) ~ n^2 * Bell(n) / LambertW(n)^2 * (1 - 2*LambertW(n)/n). - Vaclav Kotesovec, Jul 28 2021
Conjecture: a(n) = Sum_{k=0..2^n - 1} b(k) for n >= 0 where b(2n+1) = b(n) + b(A025480(n-1)), b(2n) = b(n - 2^f(n)) + b(2n - 2^f(n)) + b(A025480(n-1)) for n > 0 with b(0) = b(1) = 1 and where f(n) = A007814(n). Also b((4^n - 1)/3) = A141154(n+1). - Mikhail Kurkov, Jan 27 2022

A333226 Least common multiple of the n-th composition in standard order.

Original entry on oeis.org

1, 2, 1, 3, 2, 2, 1, 4, 3, 2, 2, 3, 2, 2, 1, 5, 4, 6, 3, 6, 2, 2, 2, 4, 3, 2, 2, 3, 2, 2, 1, 6, 5, 4, 4, 3, 6, 6, 3, 4, 6, 2, 2, 6, 2, 2, 2, 5, 4, 6, 3, 6, 2, 2, 2, 4, 3, 2, 2, 3, 2, 2, 1, 7, 6, 10, 5, 12, 4, 4, 4, 12, 3, 6, 6, 3, 6, 6, 3, 10, 4, 6, 6, 6, 2, 2

Offset: 1

Gus Wiseman, Mar 26 2020

nonn

The k-th composition in standard order (row k of A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again.

The version for binary indices is A271410.
The version for prime indices is A290103.
Positions of first appearances are A333225.
Let q(k) be the k-th composition in standard order:
- The terms of q(k) are row k of A066099.
- The sum of q(k) is A070939(k).
- The product of q(k) is A124758(k).
- The GCD of q(k) is A326674(k).
- The LCM of q(k) is A333226(k).
Cf. A000120, A029931, A048793, A074971, A076078, A233564, A285572, A289508, A289509, A324837, A333227, A333492.

stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Table[LCM@@stc[n],{n,100}]

A335236 Numbers k such that the k-th composition in standard order (A066099) is not a singleton nor pairwise coprime.

Original entry on oeis.org

0, 10, 21, 22, 26, 34, 36, 40, 42, 43, 45, 46, 53, 54, 58, 69, 70, 73, 74, 76, 81, 82, 84, 85, 86, 87, 88, 90, 91, 93, 94, 98, 100, 104, 106, 107, 109, 110, 117, 118, 122, 130, 136, 138, 139, 141, 142, 146, 147, 148, 149, 150, 153, 154, 156, 160, 162, 163, 164

Offset: 1

Gus Wiseman, May 28 2020

nonn

These are compositions whose product is strictly greater than the LCM of their parts.

The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

			The sequence together with the corresponding compositions begins:
    0: ()            74: (3,2,2)        109: (1,2,1,2,1)
   10: (2,2)         76: (3,1,3)        110: (1,2,1,1,2)
   21: (2,2,1)       81: (2,4,1)        117: (1,1,2,2,1)
   22: (2,1,2)       82: (2,3,2)        118: (1,1,2,1,2)
   26: (1,2,2)       84: (2,2,3)        122: (1,1,1,2,2)
   34: (4,2)         85: (2,2,2,1)      130: (6,2)
   36: (3,3)         86: (2,2,1,2)      136: (4,4)
   40: (2,4)         87: (2,2,1,1,1)    138: (4,2,2)
   42: (2,2,2)       88: (2,1,4)        139: (4,2,1,1)
   43: (2,2,1,1)     90: (2,1,2,2)      141: (4,1,2,1)
   45: (2,1,2,1)     91: (2,1,2,1,1)    142: (4,1,1,2)
   46: (2,1,1,2)     93: (2,1,1,2,1)    146: (3,3,2)
   53: (1,2,2,1)     94: (2,1,1,1,2)    147: (3,3,1,1)
   54: (1,2,1,2)     98: (1,4,2)        148: (3,2,3)
   58: (1,1,2,2)    100: (1,3,3)        149: (3,2,2,1)
   69: (4,2,1)      104: (1,2,4)        150: (3,2,1,2)
   70: (4,1,2)      106: (1,2,2,2)      153: (3,1,3,1)
   73: (3,3,1)      107: (1,2,2,1,1)    154: (3,1,2,2)

Gus Wiseman, Statistics, classes, and transformations of standard compositions

The version for prime indices is A316438.
The version for binary indices is A335237.
The complement is A335235.
The version with singletons allowed is A335239.
Binary indices are pairwise coprime or a singleton: A087087.
The version counting partitions is 1 + A335240.
All of the following pertain to compositions in standard order:
- Length is A000120.
- The parts are row k of A066099.
- Sum is A070939.
- Product is A124758.
- Reverse is A228351
- GCD is A326674.
- Heinz number is A333219.
- LCM is A333226.
Cf. A007360, A048793, A051424, A101268, A272919, A291166, A302569, A326675, A333227, A333228, A335238.

stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Select[Range[0,100],!(Length[stc[#]]==1||CoprimeQ@@stc[#])&]

A349051 Numbers k such that the k-th composition in standard order is an alternating permutation of {1..k} for some k.

Original entry on oeis.org

0, 1, 5, 6, 38, 41, 44, 50, 553, 562, 582, 593, 610, 652, 664, 708, 788, 808, 16966, 17036, 17048, 17172, 17192, 17449, 17458, 17542, 17676, 17712, 17940, 18000, 18513, 18530, 18593, 18626, 18968, 18992, 19496, 19536, 20625, 20676, 20769, 20868, 21256, 22600

Offset: 1

Gus Wiseman, Nov 08 2021

nonn

The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

A sequence is alternating if it is alternately strictly increasing and strictly decreasing, starting with either. For example, the partition (3,2,2,2,1) has no alternating permutations, even though it does have the anti-run permutations (2,3,2,1,2) and (2,1,2,3,2).

			The sequence together with the corresponding compositions begins:
        0: ()
        1: (1)
        5: (2,1)
        6: (1,2)
       38: (3,1,2)
       41: (2,3,1)
       44: (2,1,3)
       50: (1,3,2)
      553: (4,2,3,1)
      562: (4,1,3,2)
      582: (3,4,1,2)
      593: (3,2,4,1)
      610: (3,1,4,2)
      652: (2,4,1,3)
      664: (2,3,1,4)
      708: (2,1,4,3)
      788: (1,4,2,3)
      808: (1,3,2,4)
    16966: (5,3,4,1,2)
    17036: (5,2,4,1,3)

Wikipedia, Alternating permutation

These permutations are counted by A001250, complement A348615.
Compositions of this type are counted by A025047, complement A345192.
Subset of A333218, which ranks permutations of initial intervals.
Subset of A345167, which ranks alternating compositions, complement A345168.
A003242 counts Carlitz (anti-run) compositions.
A345163 counts normal partitions with an alternating permutation.
A345164 counts alternating permutations of prime indices.
A345170 counts partitions with an alternating permutation.
Compositions in standard order are the rows of A066099:
- Number of parts is given by A000120, distinct A334028.
- Sum and product of parts are given by A070939 and A124758.
- Maximum and minimum parts are given by A333766 and A333768.
- GCD and LCM are given by A326674 and A333226.
- Maximal runs and anti-runs are counted by A124767 and A333381.
- Heinz number is given by A333219.
- Runs-resistance is given by A333628.
- Partitions and strict partitions are ranked by A114994 and A333256.
- Multisets and sets are ranked by A225620 and A333255.
- Strict and constant compositions are ranked by A233564 and A272919.
- Carlitz (anti-run) compositions are ranked by A333489.
Cf. A025048, A025049, A344604, A344615, A344653, A344742, A348377, A348379, A345165.

stc[n_]:=Differences[Prepend[Join@@Position[ Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
wigQ[y_]:=Or[Length[y]==0,Length[Split[y]]== Length[y]&&Length[Split[Sign[Differences[y]]]]==Length[y]-1];
Select[Range[0,1000],Sort[stc[#]]==Range[Length[stc[#]]]&&wigQ[stc[#]]&]

Equals A333218 (permutation) /\ A345167 (alternating).

A217924 a(n) = n! * [x^n] exp(2*exp(x) - x - 2). Row sums of triangle A217537.

Original entry on oeis.org

1, 1, 3, 9, 35, 153, 755, 4105, 24323, 155513, 1064851, 7760745, 59895203, 487397849, 4166564147, 37298443977, 348667014723, 3395240969785, 34365336725715, 360837080222761, 3923531021460707, 44108832866004121, 511948390801374835, 6126363766802713481

Offset: 0

Peter Luschny, Oct 15 2012

nonn

The inverse binomial transform of a(n) is A194689.
A087981(n) = Sum_{k=0..n} (-1)^k*s(n+1,k+1)*a(k);
|A000023(n)| = |Sum_{k=0..n} (-1)^(n-k)*s(n,k)*a(k)|
where s(n,k) are the unsigned Stirling numbers of first kind.
a(n) is the number of inequivalent set partitions of {1,2,...,n} where two blocks are considered equivalent when one can be obtained from the other by an alternating (even) permutation. - Geoffrey Critzer, Mar 17 2013

			a(3)=9 because we have: {1,2,3}; {1,3,2}; {1}{2,3}; {1}{3,2}; {2}{1,3}; {2}{3,1}; {3}{1,2}; {3}{2,1}; {1}{2}{3}. - _Geoffrey Critzer_, Mar 17 2013

Vaclav Kotesovec, Table of n, a(n) for n = 0..556

Similar recurrences: A124758, A243499, A284005, A329369, A341392, A372205.

R:=PowerSeriesRing(Rationals(), 30);
Coefficients(R!(Laplace( Exp(2*Exp(x) -x-2) ))); // G. C. Greubel, Jan 09 2025

egf := exp(2*exp(x) - x - 2): ser := series(egf, x, 25):
seq(n!*coeff(ser, x, n), n = 0..23);  # Peter Luschny, Apr 22 2024

nn=23;Range[0,nn]!CoefficientList[Series[Exp[2 Exp[x]-x-2],{x,0,nn}],x]  (* Geoffrey Critzer, Mar 17 2013 *)
nmax = 25; CoefficientList[Series[1/(1 - x + ContinuedFractionK[-2*k*x^2 , 1 - (k + 1)*x, {k, 1, nmax}]), {x, 0, nmax}], x] (* Vaclav Kotesovec, Sep 25 2017 *)

a(n):=sum(sum(binomial(n,k-j)*2^j*(-1)^(k-j)*stirling2(n-k+j,j),j,0,k),k,0,n); /* Vladimir Kruchinin, Feb 28 2015 */

def A217924_list(n):
    T = A217537_triangle(n)
    return [add(T.row(n)) for n in range(n)]
A217924_list(24)

def A217924_list(prec):
    P. = PowerSeriesRing(QQ, prec)
    return P( exp(2*exp(x)-x-2) ).egf_to_ogf().list()
print(A217924_list(40)) # G. C. Greubel, Jan 09 2025

G.f.: 1/Q(0) where Q(k) = 1 + x*k - x/(1 - 2*x*(k+1)/Q(k+1) ); (continued fraction). - Sergei N. Gladkovskii, Mar 06 2013
E.g.f.: exp(2*exp(x) - x - 2). -  Geoffrey Critzer, Mar 17 2013
G.f.: 1/Q(0), where Q(k) = 1 - (k+1)*x - 2*(k+1)*x^2/Q(k+1); (continued fraction). - Sergei N. Gladkovskii, May 03 2013
G.f.: T(0)/(1-x), where T(k) = 1 - 2*x^2*(k+1)/( 2*x^2*(k+1) - (1-x-x*k)*(1-2*x-x*k)/T(k+1) ); (continued fraction). - Sergei N. Gladkovskii, Oct 19 2013
a(n) = Sum_{k=0..n} Sum_{j=0..k} binomial(n,k-j)*2^j*(-1)^(k-j)*Stirling2(n-k+j,j). - Vladimir Kruchinin, Feb 28 2015
a(n) = exp(-2) * Sum_{k>=0} 2^k * (k - 1)^n / k!. - Ilya Gutkovskiy, Jun 27 2020
Conjecture: a(n) = Sum_{k=0..2^n-1} A372205(k). - Mikhail Kurkov, Nov 21 2021 [Rewritten by Peter Luschny, Apr 22 2024]
a(n) ~ 2 * n^(n-1) * exp(n/LambertW(n/2) - n - 2) / (sqrt(1 + LambertW(n/2)) * LambertW(n/2)^(n-1)). - Vaclav Kotesovec, Jun 26 2022

Name extended by a formula of Geoffrey Critzer by Peter Luschny, Apr 22 2024

A335239 Numbers k such that the k-th composition in standard-order (A066099) does not have all pairwise coprime parts, where a singleton is not coprime unless it is (1).

Original entry on oeis.org

0, 2, 4, 8, 10, 16, 21, 22, 26, 32, 34, 36, 40, 42, 43, 45, 46, 53, 54, 58, 64, 69, 70, 73, 74, 76, 81, 82, 84, 85, 86, 87, 88, 90, 91, 93, 94, 98, 100, 104, 106, 107, 109, 110, 117, 118, 122, 128, 130, 136, 138, 139, 141, 142, 146, 147, 148, 149, 150, 153

Offset: 1

Gus Wiseman, May 28 2020

nonn

We use the Mathematica definition for CoprimeQ, so a singleton is not considered coprime unless it is (1).

The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

			The sequence together with the corresponding compositions begins:
    0: ()            45: (2,1,2,1)     86: (2,2,1,2)
    2: (2)           46: (2,1,1,2)     87: (2,2,1,1,1)
    4: (3)           53: (1,2,2,1)     88: (2,1,4)
    8: (4)           54: (1,2,1,2)     90: (2,1,2,2)
   10: (2,2)         58: (1,1,2,2)     91: (2,1,2,1,1)
   16: (5)           64: (7)           93: (2,1,1,2,1)
   21: (2,2,1)       69: (4,2,1)       94: (2,1,1,1,2)
   22: (2,1,2)       70: (4,1,2)       98: (1,4,2)
   26: (1,2,2)       73: (3,3,1)      100: (1,3,3)
   32: (6)           74: (3,2,2)      104: (1,2,4)
   34: (4,2)         76: (3,1,3)      106: (1,2,2,2)
   36: (3,3)         81: (2,4,1)      107: (1,2,2,1,1)
   40: (2,4)         82: (2,3,2)      109: (1,2,1,2,1)
   42: (2,2,2)       84: (2,2,3)      110: (1,2,1,1,2)
   43: (2,2,1,1)     85: (2,2,2,1)    117: (1,1,2,2,1)

The complement is A333227.
The version without singletons is A335236.
Ignoring repeated parts gives A335238.
Singleton or pairwise coprime partitions are counted by A051424.
Singleton or pairwise coprime sets are ranked by A087087.
Numbers whose binary indices are pairwise coprime are A326675.
Coprime partitions are counted by A327516.
Non-coprime partitions are counted by A335240.
All of the following pertain to compositions in standard order (A066099):
- Length is A000120.
- Sum is A070939.
- Product is A124758.
- Reverse is A228351
- GCD is A326674.
- Heinz number is A333219.
- LCM is A333226.
- Coprime compositions are A333227.
- Compositions whose distinct parts are coprime are A333228.
- Number of distinct parts is A334028.
Cf. A007360, A048793, A101268, A291166, A302569, A335235, A335237.

stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Select[Range[0,100],!CoprimeQ@@stc[#]&]

A335404 Numbers k such that the k-th composition in standard order (A066099) has the same product as sum.

Original entry on oeis.org

1, 2, 4, 8, 10, 16, 32, 37, 38, 41, 44, 50, 52, 64, 128, 139, 141, 142, 163, 171, 173, 174, 177, 181, 182, 184, 186, 197, 198, 209, 213, 214, 216, 218, 226, 232, 234, 256, 295, 307, 313, 316, 403, 409, 412, 457, 460, 484, 512, 535, 539, 541, 542, 647, 707, 737

Offset: 1

Gus Wiseman, Jun 06 2020

nonn

The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

			The sequence together with the corresponding compositions begins:
    1: (1)
    2: (2)
    4: (3)
    8: (4)
   10: (2,2)
   16: (5)
   32: (6)
   37: (3,2,1)
   38: (3,1,2)
   41: (2,3,1)
   44: (2,1,3)
   50: (1,3,2)
   52: (1,2,3)
   64: (7)
  128: (8)
  139: (4,2,1,1)
  141: (4,1,2,1)
  142: (4,1,1,2)
  163: (2,4,1,1)
  171: (2,2,2,1,1)

Gus Wiseman, Statistics, classes, and transformations of standard compositions

The lengths of standard compositions are given by A000120.
Sum of binary indices is A029931.
Sum of prime indices is A056239.
Sum of standard compositions is A070939.
Product of standard compositions is A124758.
Taking GCD instead of product gives A131577.
The version for prime indices is A301987.
The version for prime indices of nonprime numbers is A301988.
These compositions are counted by A335405.
Cf. A001055, A003963, A066099, A096111, A124767, A228351, A233249, A272919, A333219, A333220, A331579.

stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Select[Range[0,100],Times@@stc[#]==Plus@@stc[#]&]

A124758(a(n)) = A070939(a(n)).

A347205 a(2n+1) = a(n) for n >= 0, a(2n) = a(n) + a(n - 2^A007814(n)) for n > 0 with a(0) = 1.

Original entry on oeis.org

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

Offset: 0

Mikhail Kurkov, Aug 23 2021

Scatter plot might be called "Cypress forest on a windy day". - Antti Karttunen, Nov 30 2021

Antti Karttunen, Table of n, a(n) for n = 0..16384
J. Abate and W. Whitt, Brownian Motion and the Generalized Catalan Numbers, J. Int. Seq. 14 (2011) # 11.2.6.
Index entries for sequences with interesting graphs or plots

Cf. A000108, A006318, A007814, A059894, A108524, A115197, A116867.

Similar recurrences: A124758, A243499, A284005, A329369, A341392.

a[0] = 1; a[n_] := a[n] = If[OddQ[n], a[(n - 1)/2], a[n/2] + a[n/2 - 2^IntegerExponent[n/2, 2]]]; Array[a, 100, 0] (* Amiram Eldar, Sep 06 2021 *)

a(n) = if (n==0, 1, if (n%2, a(n\2), a(n/2) + a(n/2 - 2^valuation(n/2, 2)))); \\ Michel Marcus, Sep 09 2021

a(2n+1) = a(n) for n >= 0.
a(2n) = a(n) + a(n - 2^A007814(n)) = a(2*A059894(n)) for n > 0 with a(0) = 1.
Sum_{k=0..2^n - 1} a(k) = A000108(n+1) for n >= 0.
a((4^n - 1)/3) = A000108(n) for n >= 0.
a(2^m*(2^n - 1)) = binomial(n + m, n) for n >= 0, m >= 0.
Generalization:
b(2n+1, p, q) = b(n, p, q) for n >= 0.
b(2n, p, q) = p*b(n, p, q) + q*b(n - 2^A007814(n), p, q) = for n > 0 with b(0, p, q) = 1.
Conjectured formulas: (Start)
Sum_{k=0..2^n - 1} b(k, 2, 1) = A006318(n) for n >= 0.
Sum_{k=0..2^n - 1} b(k, 2, 2) = A115197(n) for n >= 0.
Sum_{k=0..2^n - 1} b(k, 3, 1) = A108524(n+1) for n >= 0.
Sum_{k=0..2^n - 1} b(k, 3, 3) = A116867(n) for n >= 0.
b((4^n - 1)/3, p, q) is generalized Catalan number C(p, q; n). (End)
Conjecture: a(n) = T(n, wt(n)+1), a(2n) = Sum_{k=1..wt(n)+1} T(n, k) where T(2n+1, k) = T(n, k) for 1 <= k <= wt(n)+1, T(2n+1, wt(n)+2) = T(n, wt(n)+1), T(2n, k) = Sum_{i=1..k} T(n, i) for 1 <= k <= wt(n)+1 with T(0, 1) = 1. - Mikhail Kurkov, Dec 13 2024

cp's OEIS Frontend

A333768 Minimum part of the n-th composition in standard order. a(0) = 0.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A335238 Numbers k such that the distinct parts of the k-th composition in standard order (A066099) are not pairwise coprime, where a singleton is not coprime unless it is (1).

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A011965 Second differences of Bell numbers.

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Magma

Maple

Mathematica

Python

Python

Formula

A333226 Least common multiple of the n-th composition in standard order.

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A335236 Numbers k such that the k-th composition in standard order (A066099) is not a singleton nor pairwise coprime.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A349051 Numbers k such that the k-th composition in standard order is an alternating permutation of {1..k} for some k.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A217924 a(n) = n! * [x^n] exp(2*exp(x) - x - 2). Row sums of triangle A217537.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Magma

Maple

Mathematica

Maxima

Sage

SageMath

Formula