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 21-30 of 39 results. Next

A357624 Skew-alternating sum of the reversed n-th composition in standard order.

Original entry on oeis.org

0, 1, 2, 0, 3, -1, 1, -1, 4, -2, 0, -2, 2, -2, 0, 0, 5, -3, -1, -3, 1, -3, -1, 1, 3, -3, -1, -1, 1, -1, 1, 1, 6, -4, -2, -4, 0, -4, -2, 2, 2, -4, -2, 0, 0, 0, 2, 2, 4, -4, -2, -2, 0, -2, 0, 2, 2, -2, 0, 0, 2, 0, 2, 0, 7, -5, -3, -5, -1, -5, -3, 3, 1, -5, -3, 1
Offset: 0

Views

Author

Gus Wiseman, Oct 08 2022

Keywords

Comments

We define the skew-alternating sum of a sequence (A, B, C, D, E, F, G, ...) to be A - B - C + D + E - F - G + ....
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.

Examples

			The 357-th composition is (2,1,3,2,1) so a(357) = 1 - 2 - 3 + 2 + 1 = -1.
The 358-th composition is (2,1,3,1,2) so a(358) = 2 - 1 - 3 + 1 + 2 = 1.
		

Crossrefs

See link for sequences related to standard compositions.
The half-alternating form is A357622, non-reverse A357621.
The reverse version is A357623.
Positions of zeros are A357628, non-reverse A357627.
The version for prime indices is A357630.
The version for Heinz numbers of partitions is A357634.
A124754 gives alternating sum of standard compositions, reverse A344618.
A357637 counts partitions by half-alternating sum, skew A357638.
A357641 counts comps w/ half-alt sum 0, partitions A357639, even A357642.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    skats[f_]:=Sum[f[[i]]*(-1)^(1+Ceiling[(i+1)/2]),{i,Length[f]}];
    Table[skats[Reverse[stc[n]]],{n,0,100}]

A357487 Number of integer partitions of n with the same length as reverse-alternating sum.

Original entry on oeis.org

1, 1, 0, 0, 0, 1, 0, 2, 0, 4, 0, 5, 0, 9, 0, 13, 0, 23, 0, 34, 0, 54, 0, 78, 0, 120, 0, 170, 0, 252, 0, 358, 0, 517, 0, 725, 0, 1030, 0, 1427, 0, 1992, 0, 2733, 0, 3759, 0, 5106, 0, 6946, 0, 9345, 0, 12577, 0, 16788, 0, 22384, 0, 29641, 0
Offset: 0

Views

Author

Gus Wiseman, Oct 01 2022

Keywords

Comments

A partition of n is a weakly decreasing sequence of positive integers summing to n.
The reverse-alternating sum of a sequence (y_1,...,y_k) is Sum_i (-1)^i y_i.

Examples

			The a(1) = 1 through a(13) = 9 partitions:
  1   .  .  .  311   .  322   .  333     .  443     .  553
                        421      432        542        652
                                 531        641        751
                                 51111      52211      52222
                                            62111      53311
                                                       62221
                                                       63211
                                                       73111
                                                       7111111
		

Crossrefs

For product equal to sum we have A001055, compositions A335405.
The version for compositions is A357182, reverse ranked by A357184.
The reverse version is A357189, ranked by A357486.
These partitions are ranked by A357485.
Removing zeros gives A357488.
A000041 counts partitions, strict A000009.
A025047 counts alternating compositions.
A103919 counts partitions by alternating sum, full triangle A344651.
A357136 counts compositions by alternating sum, full triangle A097805.

Programs

  • Mathematica
    ats[y_]:=Sum[(-1)^(i-1)*y[[i]],{i,Length[y]}];
    Table[Length[Select[IntegerPartitions[n],Length[#]==ats[Reverse[#]]&]],{n,0,30}]

A357185 Numbers k such that the k-th composition in standard order has the same length as the absolute value of its alternating sum.

Original entry on oeis.org

0, 1, 9, 12, 19, 22, 28, 34, 40, 69, 74, 84, 97, 104, 132, 135, 141, 144, 153, 177, 195, 198, 204, 216, 225, 240, 265, 271, 274, 283, 286, 292, 307, 310, 316, 321, 328, 355, 358, 364, 376, 386, 400, 451, 454, 460, 472, 496, 520, 523, 526, 533, 538, 544, 553
Offset: 1

Views

Author

Gus Wiseman, Sep 28 2022

Keywords

Comments

A composition of n is a finite sequence of positive integers summing to n. 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 alternating sum of a sequence (y_1,...,y_k) is Sum_i (-1)^(i-1) y_i.

Examples

			The sequence together with the corresponding compositions begins:
    0: ()
    1: (1)
    9: (3,1)
   12: (1,3)
   19: (3,1,1)
   22: (2,1,2)
   28: (1,1,3)
   34: (4,2)
   40: (2,4)
   69: (4,2,1)
   74: (3,2,2)
   84: (2,2,3)
   97: (1,5,1)
  104: (1,2,4)
  132: (5,3)
  135: (5,1,1,1)
  141: (4,1,2,1)
		

Crossrefs

See link for sequences related to standard compositions.
For sum equal to twice alternating sum we have A348614, counted by A262977.
For product equal to sum we have A335404, counted by A335405.
These compositions are counted by A357183.
This is the absolute value version of A357184, counted by A357183.
A003242 counts anti-run compositions, ranked by A333489.
A011782 counts compositions.
A025047 counts alternating compositions, ranked by A345167.
A032020 counts strict compositions, ranked by A233564.
A124754 gives alternating sums of standard compositions.
A238279 counts compositions by sum and number of maximal runs.
A357136 counts compositions by alternating sum.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    ats[y_]:=Sum[(-1)^(i-1)*y[[i]],{i,Length[y]}];
    Select[Range[0,100],Length[stc[#]]==Abs[ats[stc[#]]]&]

A357486 Heinz numbers of integer partitions with the same length as alternating sum.

Original entry on oeis.org

1, 2, 10, 20, 21, 42, 45, 55, 88, 91, 105, 110, 125, 156, 176, 182, 187, 198, 231, 245, 247, 312, 340, 351, 374, 390, 391, 396, 429, 494, 532, 544, 550, 551, 605, 663, 680, 702, 713, 714, 765, 780, 782, 845, 891, 910, 912, 969, 975, 1012, 1064, 1073, 1078
Offset: 1

Views

Author

Gus Wiseman, Oct 01 2022

Keywords

Comments

The Heinz number of a partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions.
The alternating sum of a sequence (y_1,...,y_k) is Sum_i (-1)^(i-1) y_i.

Examples

			The terms together with their prime indices begin:
     1: {}
     2: {1}
    10: {1,3}
    20: {1,1,3}
    21: {2,4}
    42: {1,2,4}
    45: {2,2,3}
    55: {3,5}
    88: {1,1,1,5}
    91: {4,6}
   105: {2,3,4}
   110: {1,3,5}
   125: {3,3,3}
   156: {1,1,2,6}
   176: {1,1,1,1,5}
		

Crossrefs

For product instead of length we have new, counted by A004526.
The version for compositions is A357184, counted by A357182.
For absolute value we have A357486, counted by A357487.
These partitions are counted by A357189.
A000041 counts partitions, strict A000009.
A000712 up to 0's counts partitions, sum = twice alt sum, rank A349159.
A001055 counts partitions with product equal to sum, ranked by A301987.
A006330 up to 0's counts partitions, sum = twice rev-alt sum, rank A349160.
A025047 counts alternating compositions.
A357136 counts compositions by alternating sum.

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    ats[y_]:=Sum[(-1)^(i-1)*y[[i]],{i,Length[y]}];
    Select[Range[100],PrimeOmega[#]==ats[Reverse[primeMS[#]]]&]

A108044 Triangle read by rows: right half of Pascal's triangle (A007318) interspersed with 0's.

Original entry on oeis.org

1, 0, 1, 2, 0, 1, 0, 3, 0, 1, 6, 0, 4, 0, 1, 0, 10, 0, 5, 0, 1, 20, 0, 15, 0, 6, 0, 1, 0, 35, 0, 21, 0, 7, 0, 1, 70, 0, 56, 0, 28, 0, 8, 0, 1, 0, 126, 0, 84, 0, 36, 0, 9, 0, 1, 252, 0, 210, 0, 120, 0, 45, 0, 10, 0, 1, 0, 462, 0, 330, 0, 165, 0, 55, 0, 11, 0, 1, 924, 0, 792, 0, 495, 0, 220, 0, 66
Offset: 0

Views

Author

N. J. A. Sloane, Jun 02 2005

Keywords

Comments

Column k has e.g.f. Bessel_I(k,2x). - Paul Barry, Mar 10 2010
T(n,k) is the number of binary sequences of length n in which the number of ones minus the number of zeros is k. If 2 divides(n+k), such a sequence will have (n+k)/2 ones and (n-k)/2 zeros. Since there are C(n,(n+k)/2) ways to choose the sequence entries that get a one, T(n,k)=binomial(n,(n+k)/2) whenever (n+k) is even and T(n,k)= 0 otherwise. See the example below in the example section. - Dennis P. Walsh, Apr 11 2012
T(n,k) is the number of walks on the semi-infinite integer line with n steps that end at k. The walks start at 0, move at each step either one to the left or one to the right, and never enter the region of negative k. [Walks with impenetrable wall at -1/2. Dyck excursions of n steps that end at level k.] The variant without the restriction of negative positions is A053121. - R. J. Mathar, Nov 02 2023

Examples

			Triangle begins:
  1
  0 1
  2 0 1
  0 3 0 1
  6 0 4 0 1
  0 10 0 5 0 1
  20 0 15 0 6 0 1
From _Paul Barry_, Mar 10 2010: (Start)
Production matrix is
  0, 1,
  2, 0, 1,
  0, 1, 0, 1,
  0, 0, 1, 0, 1,
  0, 0, 0, 1, 0, 1,
  0, 0, 0, 0, 1, 0, 1,
  0, 0, 0, 0, 0, 1, 0, 1,
  0, 0, 0, 0, 0, 0, 1, 0, 1,
  0, 0, 0, 0, 0, 0, 0, 1, 0, 1 (End)
T(5,1)=10 since there are 10 binary sequences of length 5 in which the number of ones exceed the number of zeros by exactly 1, namely, 00111, 01011, 01101, 01110, 10011, 10101, 10110, 11001, 11010, and 11100. Also, T(5,2)=0 since there are no binary sequences in which the number of ones exceed the number of zeros by exactly 2. - _Dennis P. Walsh_, Apr 11 2012
		

Crossrefs

Cf. A007318, A108045 (matrix inverse),
Cf. A204293, A357136, A000984 (column 0), A001700 (column 1), A001791 (column 2), A002054 (column 3)

Programs

  • Haskell
    import Data.List (intersperse)
    a108044 n k = a108044_tabl !! n !! k
    a108044_row n = a108044_tabl !! n
    a108044_tabl = zipWith drop [0..] $ map (intersperse 0) a007318_tabl
    -- Reinhard Zumkeller, May 18 2013
  • Maple
    T:=proc(n,k) if n+k mod 2 = 0 then binomial(n,(n+k)/2) else 0 fi end: for n from 0 to 13 do seq(T(n,k),k=0..n) od; # yields sequence in triangular form; Emeric Deutsch, Jun 05 2005
  • Mathematica
    b[n_,k_]:=If[EvenQ[n+k],Binomial[n,(n+k)/2],0]; Flatten[Table[b[n,k],{n,0,20},{k,0,n}]] (* Harvey P. Dale, May 05 2013 *)

Formula

Each entry is the sum of those in the previous row that are to its left and to its right.
Riordan array (1/sqrt(1-4*x^2), (1-sqrt(1-4*x^2))/(2*x)).
T(n, k) = binomial(n, (n+k)/2) if n+k is even, T(n, k)=0 if n+k is odd. G.f.=f/(1-tg), where f=1/sqrt(1-4x^2) and g=(1-sqrt(1-4x^2))/(2x). - Emeric Deutsch, Jun 05 2005
From Peter Bala, Jun 29 2015: (Start)
Riordan array has the form ( x*h'(x)/h(x), h(x) ) with h(x) = ( 1 - sqrt(1 - 4*x) )/(2*x) and so belongs to the hitting time subgroup H of the Riordan group (see Peart and Woan).
T(n,k) = [x^(n-k)] f(x)^n with f(x) = 1 + x^2. In general the (n,k)th entry of the hitting time array ( x*h'(x)/h(x), h(x) ) has the form [x^(n-k)] f(x)^n, where f(x) = x/( series reversion of h(x) ).
The inverse array is A108045 (a hitting time array with h(x) = x/(1 + x^2)). (End)

Extensions

More terms from Emeric Deutsch and Christian G. Bower, Jun 05 2005

A357137 Maximal run-length of the n-th composition in standard order; a(0) = 0.

Original entry on oeis.org

0, 1, 1, 2, 1, 1, 1, 3, 1, 1, 2, 2, 1, 1, 2, 4, 1, 1, 1, 2, 1, 2, 1, 3, 1, 1, 2, 2, 2, 2, 3, 5, 1, 1, 1, 2, 2, 1, 1, 3, 1, 1, 3, 2, 1, 1, 2, 4, 1, 1, 1, 2, 1, 2, 1, 3, 2, 2, 2, 2, 3, 3, 4, 6, 1, 1, 1, 2, 1, 1, 1, 3, 1, 2, 2, 2, 1, 1, 2, 4, 1, 1, 1, 2, 2, 3, 2
Offset: 0

Views

Author

Gus Wiseman, Sep 18 2022

Keywords

Comments

A composition of n is a finite sequence of positive integers summing to n. 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.

Examples

			Composition 92 in standard order is (2,1,1,3), so a(92) = 2.
		

Crossrefs

See link for more sequences related to standard compositions.
The version for Heinz numbers of partitions is A051903, for parts A061395.
For parts instead of run-lengths we have A333766, minimal A333768.
The opposite (minimal) version is A357138.
For first instead of maximal we have A357180, last A357181.

Programs

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

A357645 Triangle read by rows where T(n,k) is the number of integer compositions of n with half-alternating sum k, where k ranges from -n to n in steps of 2.

Original entry on oeis.org

1, 0, 1, 0, 0, 2, 0, 0, 1, 3, 0, 0, 2, 2, 4, 0, 0, 3, 5, 3, 5, 0, 0, 4, 8, 10, 4, 6, 0, 0, 5, 11, 18, 18, 5, 7, 0, 0, 6, 14, 28, 36, 30, 6, 8, 0, 0, 7, 17, 41, 63, 65, 47, 7, 9, 0, 0, 8, 20, 58, 104, 126, 108, 70, 8, 10, 0, 0, 9, 23, 80, 164, 230, 230, 168, 100, 9, 11
Offset: 0

Views

Author

Gus Wiseman, Oct 12 2022

Keywords

Comments

We define the half-alternating sum of a sequence (A, B, C, D, E, F, G, ...) to be A + B - C - D + E + F - G - ...

Examples

			Triangle begins:
   1
   0   1
   0   0   2
   0   0   1   3
   0   0   2   2   4
   0   0   3   5   3   5
   0   0   4   8  10   4   6
   0   0   5  11  18  18   5   7
   0   0   6  14  28  36  30   6   8
   0   0   7  17  41  63  65  47   7   9
   0   0   8  20  58 104 126 108  70   8  10
Row n = 6 counts the following compositions:
  (114)   (123)    (132)     (141)  (6)
  (1113)  (213)    (222)     (231)  (15)
  (1122)  (1212)   (312)     (321)  (24)
  (1131)  (1221)   (1311)    (411)  (33)
          (2112)   (2211)           (42)
          (2121)   (3111)           (51)
          (11121)  (11112)
          (11211)  (12111)
                   (21111)
                   (111111)
		

Crossrefs

Row sums are A011782.
For original alternating sum we have A097805, unordered A344651.
Column k = n-4 appears to be A177787.
The case of partitions is A357637, skew A357638.
The central column k=0 is A357641 (aerated).
The skew-alternating version is A357646.
The reverse version for partitions is A357704, skew A357705.
A351005 = alternately equal and unequal partitions, compositions A357643.
A351006 = alternately unequal and equal partitions, compositions A357644.
A357621 gives half-alternating sum of standard compositions, skew A357623.
A357629 gives half-alternating sum of prime indices, skew A357630.
A357633 gives half-alternating sum of Heinz partition, skew A357634.

Programs

  • Mathematica
    halfats[f_]:=Sum[f[[i]]*(-1)^(1+Ceiling[i/2]),{i,Length[f]}];
    Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],halfats[#]==k&]],{n,0,10},{k,-n,n,2}]

A177787 Number of paths from (0,0) to (n+2,n) using only up and right steps and avoiding two or more consecutive moves up or three or more consecutive moves right.

Original entry on oeis.org

2, 5, 10, 18, 30, 47, 70, 100, 138, 185, 242, 310, 390, 483, 590, 712, 850, 1005, 1178, 1370, 1582, 1815, 2070, 2348, 2650, 2977, 3330, 3710, 4118, 4555, 5022, 5520, 6050, 6613, 7210, 7842, 8510, 9215, 9958, 10740, 11562, 12425, 13330, 14278, 15270
Offset: 1

Views

Author

Shanzhen Gao, May 13 2010

Keywords

Comments

Strings of length 2n+2 over the alphabet {U, R} with n Rs and avoiding UU or RRR as substrings.
Also number of binary words with 3 1's and n 0's that do not contain the substring 101. a(2) = 5: 00111, 10011, 11001, 11100, 01110. - Alois P. Heinz, Jul 18 2013
Let (b(n)) be the p-INVERT of A010892 using p(S) = 1 - S^2; then b(n) = a(n+1) for n >= 0. See A292301. - Clark Kimberling, Sep 30 2017
From Gus Wiseman, Oct 13 2022: (Start)
Also the number of integer compositions of n+3 with half-alternating sum n-1, where we define the half-alternating sum of a sequence (A, B, C, D, E, F, G, ...) to be A + B - C - D + E + F - G - ... For example, the a(1) = 2 through a(4) = 10 compositions are:
(112) (122) (132)
(1111) (212) (222)
(1211) (312)
(2111) (1311)
(11111) (2211)
(3111)
(11112)
(12111)
(21111)
(111111)
A001700/A138364 = compositions with alternating sum 0, ranked by A344619.
A357621 = half-alternating sum of standard compositions, reverse A357622.
A357641 = compositions with half-alternating sum 0, ranked by A357625.
(End)

Crossrefs

First differences of A227161. - Alois P. Heinz, Jul 18 2013

Programs

  • Magma
    I:=[2, 5, 10, 18]; [n le 4 select I[n] else 4*Self(n-1)-6*Self(n-2)+4*Self(n-3)-Self(n-4): n in [1..50]]; // Vincenzo Librandi, Jul 04 2012
  • Maple
    a:= n-> n/6*(11+n^2): seq(a(n), n=1..40);
  • Mathematica
    CoefficientList[Series[(2-3*x+2*x^2)/(x-1)^4,{x,0,50}],x] (* Vincenzo Librandi, Jul 04 2012 *)

Formula

a(n) = 1/6 * n (11 + n^2).
From R. J. Mathar, May 22 2010: (Start)
a(n) = A140226(n)/2.
a(n) = 4*a(n-1) - 6*a(n-2) + 4*a(n-3) - a(n-4).
G.f.: x*(2-3*x+2*x^2)/(x-1)^4. (End)

Extensions

More terms from R. J. Mathar, May 22 2010

A357646 Triangle read by rows where T(n,k) is the number of integer compositions of n with skew-alternating sum k, where k ranges from -n to n in steps of 2.

Original entry on oeis.org

1, 0, 1, 0, 1, 1, 0, 2, 1, 1, 0, 3, 3, 1, 1, 0, 4, 5, 5, 1, 1, 0, 5, 7, 10, 8, 1, 1, 0, 6, 9, 17, 18, 12, 1, 1, 0, 7, 11, 27, 35, 29, 17, 1, 1, 0, 8, 13, 41, 63, 63, 43, 23, 1, 1, 0, 9, 15, 60, 106, 126, 104, 60, 30, 1, 1, 0, 10, 17, 85, 168, 232, 230, 162, 80, 38, 1, 1
Offset: 0

Views

Author

Gus Wiseman, Oct 12 2022

Keywords

Comments

We define the skew-alternating sum of a sequence (A, B, C, D, E, F, G, ...) to be A - B - C + D + E - F - G + ...

Examples

			Triangle begins:
   1
   0   1
   0   1   1
   0   2   1   1
   0   3   3   1   1
   0   4   5   5   1   1
   0   5   7  10   8   1   1
   0   6   9  17  18  12   1   1
   0   7  11  27  35  29  17   1   1
   0   8  13  41  63  63  43  23   1   1
   0   9  15  60 106 126 104  60  30   1   1
Row n = 6 counts the following compositions:
  (15)   (24)    (33)      (42)     (51)  (6)
  (114)  (213)   (312)     (411)
  (123)  (222)   (321)     (1113)
  (132)  (231)   (1122)    (2112)
  (141)  (1131)  (1212)    (3111)
         (1221)  (2121)    (11112)
         (1311)  (2211)    (11121)
                 (11211)   (21111)
                 (12111)
                 (111111)
		

Crossrefs

The central column k=0 is A001700 (aerated), half A357641.
Row sums are A011782.
For original alternating sum we have A097805, unordered A344651.
The skew-alternating sum of standard compositions is A357623, half A357621.
The case of partitions is A357638, half A357637.
The half-alternating version is A357645.
The reverse version for partitions is A357705, half A357704.

Programs

  • Mathematica
    skats[f_]:=Sum[f[[i]]*(-1)^(1+Ceiling[(i+1)/2]),{i,Length[f]}];
    Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],skats[#]==k&]],{n,0,10},{k,-n,n,2}]

A357704 Triangle read by rows where T(n,k) is the number of reversed integer partitions of n with half-alternating sum k, where k ranges from -n to n in steps of 2.

Original entry on oeis.org

1, 0, 1, 0, 0, 2, 0, 0, 1, 2, 0, 0, 2, 0, 3, 0, 0, 2, 2, 0, 3, 0, 0, 3, 1, 3, 0, 4, 0, 0, 3, 2, 4, 2, 0, 4, 0, 0, 4, 2, 6, 2, 3, 0, 5, 0, 0, 4, 3, 5, 7, 3, 3, 0, 5, 0, 0, 5, 3, 8, 4, 10, 2, 4, 0, 6, 0, 0, 5, 4, 8, 6, 11, 9, 3, 4, 0, 6, 0, 0, 6, 4, 11, 5, 15, 8, 13, 3, 5, 0, 7
Offset: 0

Views

Author

Gus Wiseman, Oct 10 2022

Keywords

Comments

We define the half-alternating sum of a sequence (A, B, C, D, E, F, G, ...) to be A + B - C - D + E + F - G - ...

Examples

			Triangle begins:
  1
  0  1
  0  0  2
  0  0  1  2
  0  0  2  0  3
  0  0  2  2  0  3
  0  0  3  1  3  0  4
  0  0  3  2  4  2  0  4
  0  0  4  2  6  2  3  0  5
  0  0  4  3  5  7  3  3  0  5
  0  0  5  3  8  4 10  2  4  0  6
  0  0  5  4  8  6 11  9  3  4  0  6
  0  0  6  4 11  5 15  8 13  3  5  0  7
  0  0  6  5 11  8 13 19 10 13  4  5  0  7
  0  0  7  5 14  8 19 13 25  9 17  4  6  0  8
  0  0  7  6 14 11 19 17 29 23 13 18  5  6  0  8
Row n = 7 counts the following reversed partitions:
  .  .  (115)   (124)   (133)      (11113)   .  (7)
        (1114)  (1222)  (223)      (111112)     (16)
        (1123)          (11122)                 (25)
                        (1111111)               (34)
		

Crossrefs

Row sums are A000041.
Last entry of row n is A008619(n).
The central column in the non-reverse case is A035363, skew A035544.
For original reverse-alternating sum we have A344612.
For original alternating sum we have A344651, ordered A097805.
The non-reverse version is A357637, skew A357638.
The central column is A357639, skew A357640.
The non-reverse ordered version (compositions) is A357645, skew A357646.
The skew-alternating version is A357705.
A351005 = alternately equal and unequal partitions, compositions A357643.
A351006 = alternately unequal and equal partitions, compositions A357644.
A357621 gives half-alternating sum of standard compositions, skew A357623.
A357629 gives half-alternating sum of prime indices, skew A357630.
A357633 gives half-alternating sum of Heinz partition, skew A357634.

Programs

  • Mathematica
    halfats[f_]:=Sum[f[[i]]*(-1)^(1+Ceiling[i/2]),{i,Length[f]}];
    Table[Length[Select[Reverse/@IntegerPartitions[n],halfats[#]==k&]],{n,0,15},{k,-n,n,2}]
Previous Showing 21-30 of 39 results. Next