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

A345925 Numbers k such that the k-th composition in standard order (row k of A066099) has alternating sum 2.

Original entry on oeis.org

2, 9, 11, 14, 34, 37, 39, 42, 45, 47, 52, 57, 59, 62, 132, 137, 139, 142, 146, 149, 151, 154, 157, 159, 164, 169, 171, 174, 178, 181, 183, 186, 189, 191, 200, 209, 211, 214, 220, 226, 229, 231, 234, 237, 239, 244, 249, 251, 254, 520, 529, 531, 534, 540, 546
Offset: 1

Views

Author

Gus Wiseman, Jul 11 2021

Keywords

Comments

The alternating sum of a sequence (y_1,...,y_k) is Sum_i (-1)^(i-1) y_i.
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 initial terms and corresponding compositions:
      2: (2)            137: (4,3,1)
      9: (3,1)          139: (4,2,1,1)
     11: (2,1,1)        142: (4,1,1,2)
     14: (1,1,2)        146: (3,3,2)
     34: (4,2)          149: (3,2,2,1)
     37: (3,2,1)        151: (3,2,1,1,1)
     39: (3,1,1,1)      154: (3,1,2,2)
     42: (2,2,2)        157: (3,1,1,2,1)
     45: (2,1,2,1)      159: (3,1,1,1,1,1)
     47: (2,1,1,1,1)    164: (2,3,3)
     52: (1,2,3)        169: (2,2,3,1)
     57: (1,1,3,1)      171: (2,2,2,1,1)
     59: (1,1,2,1,1)    174: (2,2,1,1,2)
     62: (1,1,1,1,2)    178: (2,1,3,2)
    132: (5,3)          181: (2,1,2,2,1)
		

Crossrefs

These compositions are counted by A088218.
These are the positions of 2's in A124754.
The case of partitions of 2n is A344741.
The version for reverse-alternating sum is A345922.
The opposite (negative 2) version is A345924.
The version for Heinz numbers of partitions is A345960 (reverse: A345961).
A000041 counts partitions of 2n with alternating sum 0, ranked by A000290.
A011782 counts compositions.
A097805 counts compositions by alternating (or reverse-alternating) sum.
A103919 counts partitions by sum and alternating sum (reverse: A344612).
A120452 counts partitions of 2n with reverse-alternating sum 2.
A316524 gives the alternating sum of prime indices (reverse: A344616).
A345197 counts compositions by sum, length, and alternating sum.
Standard compositions: A000120, A066099, A070939, A228351, A124754, A344618.
Compositions of n, 2n, or 2n+1 with alternating/reverse-alternating sum k:
- k = 0: counted by A088218, ranked by A344619/A344619.
- k = 1: counted by A000984, ranked by A345909/A345911.
- k = -1: counted by A001791, ranked by A345910/A345912.
- k = 2: counted by A088218, ranked by A345925/A345922.
- k = -2: counted by A002054, ranked by A345924/A345923.
- k >= 0: counted by A116406, ranked by A345913/A345914.
- k <= 0: counted by A058622(n-1), ranked by A345915/A345916.
- k > 0: counted by A027306, ranked by A345917/A345918.
- k < 0: counted by A294175, ranked by A345919/A345920.
- k != 0: counted by A058622, ranked by A345921/A345921.
- k even: counted by A081294, ranked by A053754/A053754.
- k odd: counted by A000302, ranked by A053738/A053738.

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],ats[stc[#]]==2&]

A345958 Numbers whose prime indices have reverse-alternating sum 1.

Original entry on oeis.org

2, 6, 8, 15, 18, 24, 32, 35, 50, 54, 60, 72, 77, 96, 98, 128, 135, 140, 143, 150, 162, 200, 216, 221, 240, 242, 288, 294, 308, 315, 323, 338, 375, 384, 392, 437, 450, 486, 512, 540, 560, 572, 578, 600, 648, 667, 693, 722, 726, 735, 800, 864, 875, 882, 884, 899
Offset: 1

Views

Author

Gus Wiseman, Jul 11 2021

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.
The reverse-alternating sum of a sequence (y_1,...,y_k) is Sum_i (-1)^(k-i) y_i. Of course, the reverse-alternating sum of prime indices is also the alternating sum of reversed prime indices.
Also numbers with exactly one odd conjugate prime index. Conjugate prime indices are listed by A321650, ranked by A122111.

Examples

			The initial terms and their prime indices:
   2: {1}
   6: {1,2}
   8: {1,1,1}
  15: {2,3}
  18: {1,2,2}
  24: {1,1,1,2}
  32: {1,1,1,1,1}
  35: {3,4}
  50: {1,3,3}
  54: {1,2,2,2}
  60: {1,1,2,3}
  72: {1,1,1,2,2}
  77: {4,5}
  96: {1,1,1,1,1,2}
  98: {1,4,4}
		

Crossrefs

The k > 0 version is A000037.
These multisets are counted by A000070.
The k = 0 version is A000290, counted by A000041.
The version for unreversed-alternating sum is A001105.
These partitions are counted by A035363.
These are the positions of 1's in A344616.
The k = 2 version is A345961, counted by A120452.
A000984/A345909/A345911 count/rank compositions with alternating sum 1.
A001791/A345910/A345912 count/rank compositions with alternating sum -1.
A088218 counts compositions with alternating sum 0, ranked by A344619.
A025047 counts wiggly compositions.
A027187 counts partitions with reverse-alternating sum <= 0.
A056239 adds up prime indices, row sums of A112798.
A097805 counts compositions by alternating (or reverse-alternating) sum.
A103919 counts partitions by sum and alternating sum (reverse: A344612).
A316524 gives the alternating sum of prime indices.
A325534 and A325535 count separable and inseparable partitions.
A344606 counts alternating permutations of prime indices.
A344607 counts partitions with reverse-alternating sum >= 0.
A344610 counts partitions by sum and positive reverse-alternating sum.

Programs

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

A344650 Number of strict odd-length integer partitions of 2n.

Original entry on oeis.org

0, 1, 1, 2, 3, 5, 8, 11, 16, 23, 32, 44, 61, 82, 111, 148, 195, 256, 334, 432, 557, 713, 908, 1152, 1455, 1829, 2291, 2859, 3554, 4404, 5440, 6697, 8222, 10066, 12288, 14964, 18176, 22023, 26625, 32117, 38656, 46432, 55661, 66592, 79523, 94793, 112792, 133984
Offset: 0

Views

Author

Gus Wiseman, Jun 05 2021

Keywords

Comments

Also the number of strict integer partitions of 2n with reverse-alternating sum >= 0.
Also the number of reversed strict integer partitions of 2n with alternating sum >= 0.

Examples

			The a(1) = 1 through a(8) = 16 partitions:
  (2)  (4)  (6)      (8)      (10)     (12)     (14)      (16)
            (3,2,1)  (4,3,1)  (5,3,2)  (5,4,3)  (6,5,3)   (7,5,4)
                     (5,2,1)  (5,4,1)  (6,4,2)  (7,4,3)   (7,6,3)
                              (6,3,1)  (6,5,1)  (7,5,2)   (8,5,3)
                              (7,2,1)  (7,3,2)  (7,6,1)   (8,6,2)
                                       (7,4,1)  (8,4,2)   (8,7,1)
                                       (8,3,1)  (8,5,1)   (9,4,3)
                                       (9,2,1)  (9,3,2)   (9,5,2)
                                                (9,4,1)   (9,6,1)
                                                (10,3,1)  (10,4,2)
                                                (11,2,1)  (10,5,1)
                                                          (11,3,2)
                                                          (11,4,1)
                                                          (12,3,1)
                                                          (13,2,1)
                                                          (6,4,3,2,1)
		

Crossrefs

The Heinz numbers are the intersection of A030059 and A300061.
Allowing even length gives A035294 (non-strict: A058696).
Even bisection of A067659.
The opposite type of strict partition (even length and odd sum) is A343942.
The non-strict version is A236559 or A344611.
Row sums of A344649.
A000041 counts partitions of 2n with alternating sum 0, ranked by A000290.
A103919 counts partitions by sum and alternating sum (reverse: A344612).
A120452 counts partitions of 2n with reverse-alternating sum 2.
A124754 gives alternating sums of standard compositions (reverse: A344618).
A152146 interleaved with A152157 counts strict partitions by sum and alternating sum.
A316524 is the alternating sum of the prime indices of n (reverse: A344616).
A343941 counts strict partitions of 2n with reverse-alternating sum 4.
A344604 counts wiggly compositions with twins.
A344739 counts strict partitions by sum and reverse-alternating sum.
A344741 counts partitions of 2n with reverse-alternating sum -2.

Programs

  • Maple
    b:= proc(n, i, t) option remember; `if`(n>i*(i+1)/2, 0,
         `if`(n=0, t, add(b(n-i*j, i-1, abs(t-j)), j=0..min(n/i, 1))))
        end:
    a:= n-> b(2*n$2, 0):
    seq(a(n), n=0..80);  # Alois P. Heinz, Aug 05 2021
  • Mathematica
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&OddQ[Length[#]]&]],{n,0,30,2}]

Formula

Sum of odd-indexed terms in row 2n of A008289.
a(n) = A067659(2n).

A344739 Triangle read by rows where T(n,k) is the number of strict integer partitions of n with reverse-alternating sum k, with k ranging from -n to n in steps of 2.

Original entry on oeis.org

1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 2, 1, 0, 1, 0, 1, 1, 1, 2, 0, 1, 2, 1, 0, 1, 0, 1, 1, 1, 2, 1, 0, 2, 2, 1, 0, 1
Offset: 0

Views

Author

Gus Wiseman, Jun 05 2021

Keywords

Comments

The reverse-alternating sum of a partition (y_1,...,y_k) is Sum_i (-1)^(k-i) y_i. This is equal to (-1)^(m-1) times the number of odd parts in the conjugate partition, where m is the number of parts. So T(n,k) is the number of strict integer partitions of n such that k is equal to (-1)^(m-1) times the number of odd conjugate parts.
By conjugation, T(n,k) is also equal to the number of integer partitions of n covering an initial interval of positive integers such that k is equal to (-1)^(r-1) times the number of odd parts, where r is the greatest part.
Also the number of reversed strict integer partitions of n with alternating sum k.

Examples

			Triangle begins:
                                      1
                                    0   1
                                  0   0   1
                                0   1   0   1
                              0   1   0   0   1
                            0   1   1   0   0   1
                          0   1   1   0   1   0   1
                        0   1   1   1   0   1   0   1
                      0   1   1   1   0   1   1   0   1
                    0   1   1   1   1   0   2   1   0   1
                  0   1   1   1   2   0   1   2   1   0   1
                0   1   1   1   2   1   0   2   2   1   0   1
              0   1   1   1   2   2   0   1   3   2   1   0   1
            0   1   1   1   2   3   1   0   2   3   2   1   0   1
          0   1   1   1   2   3   3   0   1   3   3   2   1   0   1
        0   1   1   1   2   3   4   1   0   3   4   3   2   1   0   1
      0   1   1   1   2   3   5   3   0   1   4   4   3   2   1   0   1
    0   1   1   1   2   3   5   5   1   0   3   5   4   3   2   1   0   1
  0   1   1   1   2   3   5   6   4   0   1   5   6   4   3   2   1   0   1
For example, the partitions counted by row n = 15 are (empty columns shown as dots, A...F = 10..15):
  .  E1  D2  C3  B4    A5    96    87  .  762    654  843  A32  C21  .  F
                 9321  7431  6432         861    753  942  B31
                       8421  6531         54321  852  A41
                             7521                951
		

Crossrefs

Row sums are A000009.
The non-reverse version is A152146 interleaved with A152157.
The non-strict version is A344612.
The right halves of even-indexed rows are A344649.
The non-reverse non-strict version is the right half of A344651, which is A239830 interleaved with A239829.
A000041 counts partitions of 2n with alternating sum 0, ranked by A000290.
A124754 lists alternating sums of standard compositions (reverse: A344618).
A316524 is the alternating sum of the prime indices of n (reverse: A344616).
A344610 counts partitions of n by positive reverse-alternating sum.
A344611 counts partitions of 2n with reverse-alternating sum >= 0.

Programs

  • Mathematica
    sats[y_]:=Sum[(-1)^(i-Length[y])*y[[i]],{i,Length[y]}];
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&sats[#]==k&]],{n,0,12},{k,-n,n,2}]

A239829 Triangular array: T(n,k) = number of partitions of 2n - 1 that have alternating sum 2k - 1.

Original entry on oeis.org

1, 2, 1, 4, 2, 1, 7, 5, 2, 1, 12, 10, 5, 2, 1, 19, 19, 10, 5, 2, 1, 30, 33, 20, 10, 5, 2, 1, 45, 57, 36, 20, 10, 5, 2, 1, 67, 92, 64, 36, 20, 10, 5, 2, 1, 97, 147, 107, 65, 36, 20, 10, 5, 2, 1, 139, 227, 177, 110, 65, 36, 20, 10, 5, 2, 1, 195, 345, 282, 184
Offset: 1

Views

Author

Clark Kimberling, Mar 28 2014

Keywords

Comments

Suppose that p, with parts x(1) >= x(2) >= ... >= x(k), is a partition of n. Define AS(p), the alternating sum of p, by x(1) - x(2) + x(3) - ... + ((-1)^(k-1))*x(k); note that AS(p) has the same parity as n. Column 1 is given by T(n,1) = (number of partitions of 2n-1 having AS(p) = 1) = A000070(n) for n >= 1. Columns 2 and 3 are essentially A000098 and A103924, and the limiting column (after deleting initial 0's), A000712. The sum of numbers in row n is A000041(2n-1). The corresponding array for partitions into distinct parts is given by A152157 (defined as the number of partitions of 2n+1 into 2k+1 odd parts).

Examples

			First nine rows:
1
2 ... 1
4 ... 2 ... 1
7 ... 5 ... 2 ... 1
12 .. 10 .. 5 ... 2 ... 1
19 .. 19 .. 10 .. 5 ... 2 ... 1
30 .. 33 .. 20 .. 10 .. 5 ... 2 ... 1
45 .. 57 .. 36 .. 20 .. 10 .. 5 ... 2 ... 1
67 .. 92 .. 64 .. 36 .. 20 .. 10 .. 5 ... 2 ... 1
The partitions of 5 are 5, 41, 32, 311, 221, 2111, 11111, with respective alternating sums 5, 3, 1, 3, 1, 1, 1, so that row 2 of the array is 4 .. 2 .. 1.
		

Crossrefs

Programs

  • Maple
    b:= proc(n, i, t) option remember; `if`(n=0, x^(1/2), `if`(i<1, 0,
          expand(b(n, i-1, t)+`if`(i>n, 0, b(n-i, i, -t)*x^((t*i)/2)))))
        end:
    T:= n-> (p-> seq(coeff(p, x, i), i=1..n))(b(2*n-1$2, 1)):
    seq(T(n), n=1..14);  # Alois P. Heinz, Mar 30 2014
  • Mathematica
    z = 15; s[w_] := s[w] = Total[Take[#, ;; ;; 2]] - Total[Take[Rest[#], ;; ;; 2]] &[w]; c[n_] := c[n] = Table[s[IntegerPartitions[n][[k]]], {k, 1, PartitionsP[n]}]; t[n_, k_] := Count[c[2 n - 1], 2 k - 1]; u = Table[t[n, k], {n, 1, z}, {k, 1, n}]
    TableForm[u]  (* A239829, array *)
    Flatten[u]    (* A239829, sequence *)
    (* Peter J. C. Moses, Mar 21 2014 *)
    b[n_, i_, t_] := b[n, i, t] = If[n == 0, x^(1/2), If[i<1, 0, Expand[b[n, i-1, t] + If[i>n, 0, b[n-i, i, -t]*x^((t*i)/2)]]]]; T[n_] := Function[p, Table[Coefficient[p, x, i], {i, 1, n}]][b[2n-1, 2n-1, 1]]; Table[T[n], {n, 1, 14}] // Flatten (* Jean-François Alcover, Aug 27 2016, after Alois P. Heinz *)

A152146 Triangle read by rows: T(n,k) (n >= 0, 0 <= k <= n) = number of partitions of 2n into 2k odd parts.

Original entry on oeis.org

1, 0, 1, 0, 1, 1, 0, 2, 1, 1, 0, 2, 2, 1, 1, 0, 3, 3, 2, 1, 1, 0, 3, 5, 3, 2, 1, 1, 0, 4, 6, 5, 3, 2, 1, 1, 0, 4, 9, 7, 5, 3, 2, 1, 1, 0, 5, 11, 11, 7, 5, 3, 2, 1, 1, 0, 5, 15, 14, 11, 7, 5, 3, 2, 1, 1, 0, 6, 18, 20, 15, 11, 7, 5, 3, 2, 1, 1, 0, 6, 23, 26, 22, 15, 11, 7, 5, 3, 2, 1, 1
Offset: 0

Views

Author

R. J. Mathar, Sep 25 2009, indices corrected Jul 09 2012

Keywords

Comments

In both this and A152157, reading columns downwards "converges" to A000041.
Also the number of strict integer partitions of 2n with alternating sum 2k. Also the number of normal integer partitions of 2n of which 2k parts are odd, where a partition is normal if it covers an initial interval of positive integers. - Gus Wiseman, Jun 20 2021

Examples

			Triangle begins:
  1
  0  1
  0  1  1
  0  2  1   1
  0  2  2   1   1
  0  3  3   2   1   1
  0  3  5   3   2   1   1
  0  4  6   5   3   2   1  1
  0  4  9   7   5   3   2  1  1
  0  5 11  11   7   5   3  2  1  1
  0  5 15  14  11   7   5  3  2  1  1
  0  6 18  20  15  11   7  5  3  2  1  1
  0  6 23  26  22  15  11  7  5  3  2  1  1
  0  7 27  35  29  22  15 11  7  5  3  2  1  1
  0  7 34  44  40  30  22 15 11  7  5  3  2  1 1
  0  8 39  58  52  42  30 22 15 11  7  5  3  2 1 1
  0  8 47  71  70  55  42 30 22 15 11  7  5  3 2 1 1
  0  9 54  90  89  75  56 42 30 22 15 11  7  5 3 2 1 1
  0  9 64 110 116  97  77 56 42 30 22 15 11  7 5 3 2 1 1
  0 10 72 136 146 128 100 77 56 42 30 22 15 11 7 5 3 2 1 1
From _Gus Wiseman_, Jun 20 2021: (Start)
For example, row n = 6 counts the following partitions (B = 11):
  (75)  (3333)  (333111)  (33111111)  (3111111111)  (111111111111)
  (93)  (5331)  (531111)  (51111111)
  (B1)  (5511)  (711111)
        (7311)
        (9111)
The corresponding strict partitions are:
  (7,5)      (8,4)      (9,3)    (10,2)   (11,1)  (12)
  (6,5,1)    (5,4,3)    (7,3,2)  (9,2,1)
  (5,4,2,1)  (6,4,2)    (8,3,1)
             (7,4,1)
             (6,3,2,1)
The corresponding normal partitions are:
  43221    33321     3321111    321111111   21111111111  111111111111
  322221   332211    32211111   2211111111
  2222211  432111    222111111
           3222111
           22221111
(End)
		

Crossrefs

Cf. A035294 (row sums), A107379, A152140, A152157.
Column k = 1 is A004526.
Column k = 2-8 is A026810 - A026816.
The non-strict version is A239830.
The reverse non-strict version is A344610.
The reverse version is A344649
A000041 counts partitions of 2n with alternating sum 0, ranked by A000290.
A067659 counts strict partitions of odd length.
A103919 counts partitions by sum and alternating sum (reverse: A344612).
A124754 gives alternating sum of standard compositions (reverse: A344618).
A316524 is the alternating sum of the prime indices of n (reverse: A344616).
A344611 counts partitions of 2n with reverse-alternating sum >= 0.

Programs

  • Maple
    b:= proc(n, i) option remember; `if`(n=0, 1, `if`(i<1, 0,
          b(n, i-2)+`if`(i>n, 0, expand(sqrt(x)*b(n-i, i)))))
        end:
    T:= n-> (p-> seq(coeff(p, x, i), i=0..n))(b(2*n, 2*n-1)):
    seq(T(n), n=0..12);  # Alois P. Heinz, Jun 21 2021
  • Mathematica
    ats[y_]:=Sum[(-1)^(i-1)*y[[i]],{i,Length[y]}];
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&ats[#]==k&]],{n,0,30,2},{k,0,n,2}] (* Gus Wiseman, Jun 20 2021 *)

Formula

T(n,k) = A152140(2n,2k).

A344649 Triangle read by rows where T(n,k) is the number of strict integer partitions of 2n with reverse-alternating sum 2k.

Original entry on oeis.org

1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 2, 1, 0, 1, 0, 1, 3, 2, 1, 0, 1, 0, 1, 3, 3, 2, 1, 0, 1, 0, 1, 4, 4, 3, 2, 1, 0, 1, 0, 1, 5, 6, 4, 3, 2, 1, 0, 1, 0, 1, 7, 7, 6, 4, 3, 2, 1, 0, 1, 0, 1, 8, 10, 8, 6, 4, 3, 2, 1, 0, 1
Offset: 0

Views

Author

Gus Wiseman, Jun 05 2021

Keywords

Comments

The reverse-alternating sum of a partition (y_1,...,y_k) is Sum_i (-1)^(k-i) y_i. This is equal to (-1)^(m-1) times the number of odd parts in the conjugate partition, where m is the number of parts. So T(n,k) is the number of strict integer partitions of 2n into an odd number of parts whose conjugate has exactly 2k odd parts.
Also the number of reversed strict integer partitions of 2n with alternating sum 2k.

Examples

			Triangle begins:
   1
   0   1
   0   0   1
   0   1   0   1
   0   1   1   0   1
   0   1   2   1   0   1
   0   1   3   2   1   0   1
   0   1   3   3   2   1   0   1
   0   1   4   4   3   2   1   0   1
   0   1   5   6   4   3   2   1   0   1
   0   1   7   7   6   4   3   2   1   0   1
   0   1   8  10   8   6   4   3   2   1   0   1
   0   1  10  13  12   8   6   4   3   2   1   0   1
   0   1  11  18  15  12   8   6   4   3   2   1   0   1
   0   1  14  22  21  16  12   8   6   4   3   2   1   0   1
   0   1  15  29  27  23  16  12   8   6   4   3   2   1   0   1
Row n = 8 counts the following partitions (empty columns indicated by dots):
  .  (8,7,1)  (7,6,3)      (7,5,4)   (9,4,3)   (11,3,2)  (13,2,1)  .  (16)
              (8,6,2)      (8,5,3)   (10,4,2)  (12,3,1)
              (9,6,1)      (9,5,2)   (11,4,1)
              (6,4,3,2,1)  (10,5,1)
Row n = 9 counts the following partitions (empty columns indicated by dots, A..I = 10..18):
  .  981   873     765     954   B43   D32   F21   .  I
           972     864     A53   C42   E31
           A71     963     B52   D41
           65421   A62     C51
           75321   B61
                   84321
		

Crossrefs

The non-reversed version is A152146.
The non-reversed non-strict version is A239830.
Column k = 2 is A343941.
The non-strict version is A344610.
Row sums are A344650.
Right half of even-indexed rows of A344739.
A000041 counts partitions of 2n with alternating sum 0, ranked by A000290.
A067659 counts strict partitions of odd length.
A103919 counts partitions by sum and alternating sum (reverse: A344612).
A120452 counts partitions of 2n with reverse-alternating sum 2.
A124754 gives alternating sum of standard compositions (reverse: A344618).
A316524 is the alternating sum of the prime indices of n (reverse: A344616).
A325534/A325535 count separable/inseparable partitions.
A344604 counts wiggly compositions with twins.
A344611 counts partitions of 2n with reverse-alternating sum >= 0.
A344741 counts partitions of 2n with reverse-alternating sum -2.

Programs

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

A344743 Number of integer partitions of 2n with reverse-alternating sum < 0.

Original entry on oeis.org

0, 0, 1, 3, 7, 15, 29, 54, 96, 165, 275, 449, 716, 1123, 1732, 2635, 3955, 5871, 8620, 12536, 18065, 25821, 36617, 51560, 72105, 100204, 138417, 190134, 259772, 353134, 477734, 643354, 862604, 1151773, 1531738, 2029305, 2678650, 3523378, 4618835, 6035240, 7861292
Offset: 0

Views

Author

Gus Wiseman, Jun 09 2021

Keywords

Comments

Conjecture: a(n) >= A236914.
The reverse-alternating sum of a partition (y_1,...,y_k) is Sum_i (-1)^(k-i) y_i. This is equal to (-1)^(m-1) times the number of odd parts in the conjugate partition, where m is the number of parts. So a(n) is the number of even-length partitions of 2n with at least one odd conjugate part. By conjugation, this is also the number of partitions of 2n with greatest part even and at least one odd part.
The alternating sum of a partition is never < 0, so the non-reverse version is A000004.

Examples

			The a(2) = 1 through a(5) = 15 partitions:
  (31)  (42)    (53)      (64)
        (51)    (62)      (73)
        (3111)  (71)      (82)
                (3221)    (91)
                (4211)    (3331)
                (5111)    (4222)
                (311111)  (4321)
                          (5221)
                          (5311)
                          (6211)
                          (7111)
                          (322111)
                          (421111)
                          (511111)
                          (31111111)
		

Crossrefs

The ordered version (compositions not partitions) appears to be A008549.
The Heinz numbers are A119899 /\ A300061.
Even bisection of A344608.
The complementary partitions of 2n are counted by A344611.
A000041 counts partitions of 2n with alternating sum 0, ranked by A000290.
A001523 counts unimodal compositions (partial sums: A174439).
A103919 counts partitions by sum and alternating sum (reverse: A344612).
A120452 counts partitions of 2n with rev-alt sum 2 (negative: A344741).
A124754 gives alternating sums of standard compositions (reverse: A344618).
A316524 is the alternating sum of the prime indices of n (reverse: A344616).
A325534/A325535 count separable/inseparable partitions.
A344610 counts partitions by sum and positive reverse-alternating sum.

Programs

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

Formula

a(n) = A058696(n) - A344611(n).
a(n) = sum of left half of even-indexed rows of A344612.

Extensions

More terms from Bert Dobbelaere, Jun 12 2021

A343941 Number of strict integer partitions of 2n with reverse-alternating sum 4.

Original entry on oeis.org

0, 0, 1, 0, 1, 2, 3, 3, 4, 5, 7, 8, 10, 11, 14, 15, 18, 20, 23, 25, 29, 31, 35, 38, 42, 45, 50, 53, 58, 62, 67, 71, 77, 81, 87, 92, 98, 103, 110, 115, 122, 128, 135, 141, 149, 155, 163, 170, 178, 185, 194, 201, 210, 218, 227, 235, 245, 253, 263, 272, 282, 291, 302
Offset: 0

Views

Author

Gus Wiseman, Jun 09 2021

Keywords

Comments

The reverse-alternating sum of a partition (y_1,...,y_k) is Sum_i (-1)^(k-i) y_i. This is equal to (-1)^(m-1) times the number of odd parts in the conjugate partition, where m is the number of parts, so a(n) is the number of strict odd-length integer partitions of 2n whose conjugate has exactly 4 odd parts (first example). By conjugation, this is also the number partitions of 2n covering an initial interval and containing exactly four odd parts, one of which is the greatest (second example).

Examples

			The a(2) = 1 through a(12) = 10 strict partitions (empty column indicated by dot, A..D = 10..13):
  4   .  521   532   543   653   763     873     983     A93     BA3
               631   642   752   862     972     A82     B92     CA2
                     741   851   961     A71     B81     C91     DA1
                                 64321   65421   65432   76432   76542
                                         75321   75431   76531   86541
                                                 76421   86431   87432
                                                 86321   87421   87531
                                                         97321   97431
                                                                 98421
                                                                 A8321
The a(2) = 1 through a(8) = 5 partitions covering an initial interval:
  1111  .  32111   33211    33321     333221     543211      543321
                   322111   332211    3322211    3332221     5432211
                            3222111   32222111   33222211    33322221
                                                 322222111   332222211
                                                             3222222111
		

Crossrefs

The non-reverse non-strict version is A000710.
The non-reverse version is A026810.
The non-strict version is column k = 2 of A344610.
This is column k = 2 of A344649.
A000041 counts partitions of 2n with alternating sum 0, ranked by A000290.
A103919 counts partitions by sum and alternating sum (reverse: A344612).
A120452 counts partitions of 2n with rev-alt sum 2 (negative: A344741).
A124754 gives alternating sums of standard compositions (reverse: A344618).
A316524 is the alternating sum of the prime indices of n (reverse: A344616).
A344611 counts partitions of 2n with reverse-alternating sum >= 0.

Programs

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

Extensions

More terms from Bert Dobbelaere, Jun 12 2021

A345959 Numbers whose prime indices have alternating sum -1.

Original entry on oeis.org

6, 15, 24, 35, 54, 60, 77, 96, 135, 140, 143, 150, 216, 221, 240, 294, 308, 315, 323, 375, 384, 437, 486, 540, 560, 572, 600, 667, 693, 726, 735, 864, 875, 884, 899, 960, 1014, 1147, 1176, 1215, 1232, 1260, 1287, 1292, 1350, 1500, 1517, 1536, 1715, 1734, 1748
Offset: 1

Views

Author

Gus Wiseman, Jul 12 2021

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.
The alternating sum of a sequence (y_1,...,y_k) is Sum_i (-1)^(i-1) y_i. Of course, the alternating sum of prime indices is also the reverse-alternating sum of reversed prime indices.
Also numbers with even Omega (A001222) and exactly one odd conjugate prime index. Conjugate prime indices are listed by A321650, ranked by A122111.

Examples

			The initial terms and their prime indices:
    6: {1,2}
   15: {2,3}
   24: {1,1,1,2}
   35: {3,4}
   54: {1,2,2,2}
   60: {1,1,2,3}
   77: {4,5}
   96: {1,1,1,1,1,2}
  135: {2,2,2,3}
  140: {1,1,3,4}
  143: {5,6}
  150: {1,2,3,3}
  216: {1,1,1,2,2,2}
  221: {6,7}
  240: {1,1,1,1,2,3}
		

Crossrefs

These multisets are counted by A000070.
The k = 0 version is A000290, counted by A000041.
The k = 1 version is A001105.
The k > 0 version is A026424.
These are the positions of -1's in A316524.
The k = 2 version is A345960.
The k = -2 version is A345962.
A000984/A345909/A345911 count/rank compositions with alternating sum 1.
A001791/A345910/A345912 count/rank compositions with alternating sum -1.
A027187 counts partitions with reverse-alternating sum <= 0.
A056239 adds up prime indices, row sums of A112798.
A097805 counts compositions by alternating (or reverse-alternating) sum.
A103919 counts partitions by sum and alternating sum (reverse: A344612).
A325534/A325535 count separable/inseparable partitions.
A344607 counts partitions with reverse-alternating sum >= 0.
A344616 gives the alternating sum of reversed prime indices.

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[0,100],ats[primeMS[#]]==-1&]
Previous Showing 21-30 of 36 results. Next