A357704 -id:A357704 - cp's OEIS frontend

A357639 Number of reversed integer partitions of 2n whose half-alternating sum is 0.

1, 0, 2, 1, 6, 4, 15, 13, 37, 37, 86, 94, 194, 223, 416, 497, 867, 1056, 1746, 2159, 3424, 4272, 6546, 8215, 12248, 15418, 22449, 28311, 40415, 50985, 71543, 90222, 124730, 157132, 214392, 269696, 363733, 456739, 609611, 763969, 1010203, 1263248, 1656335, 2066552, 2688866

Offset: 0

Gus Wiseman, Oct 11 2022

nonn

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 - ...

			The a(0) = 1 through a(6) = 15 reversed partitions:
  ()  .  (112)   (123)  (134)       (145)      (156)
         (1111)         (224)       (235)      (246)
                        (2222)      (11233)    (336)
                        (11222)     (1111123)  (3333)
                        (1111112)              (11244)
                        (11111111)             (11334)
                                               (12333)
                                               (1111134)
                                               (1111224)
                                               (1112223)
                                               (1122222)
                                               (11112222)
                                               (111111222)
                                               (11111111112)
                                               (111111111111)

Alois P. Heinz, Table of n, a(n) for n = 0..250 (first 51 terms from Lucas A. Brown)
Lucas A. Brown, A357639.py.

The non-reverse version is A035363/A035444.
The non-reverse skew version appears to be A035544/A035594.
These partitions are ranked by A357631, skew A357632.
The skew-alternating version is A357640.
This is the central column of A357704.
A000041 counts integer partitions (also reversed integer partitions).
A316524 gives alternating sum of prime indices, reverse A344616.
A344651 counts alternating sum of partitions by length, ordered A097805.
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.
A357637 counts partitions by half-alternating sum, skew A357637.
Cf. A029862, A053251, A357189, A357487, A357488, A357631, A357634, A357636, A357639, A357641, A357645.

halfats[f_]:=Sum[f[[i]]*(-1)^(1+Ceiling[i/2]),{i,Length[f]}];
Table[Length[Select[IntegerPartitions[2n],halfats[Reverse[#]]==0&]],{n,0,15}]

a(31) onwards from Lucas A. Brown, Oct 19 2022

A357637 Triangle read by rows where T(n,k) is the number of 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, 1, 1, 3, 0, 0, 0, 2, 2, 3, 0, 0, 0, 0, 5, 2, 4, 0, 0, 0, 0, 2, 6, 3, 4, 0, 0, 0, 0, 2, 3, 9, 3, 5, 0, 0, 0, 0, 0, 4, 7, 10, 4, 5, 0, 0, 0, 0, 0, 0, 11, 8, 13, 4, 6, 0, 0, 0, 0, 0, 0, 4, 15, 12, 14, 5, 6, 0, 0, 0, 0, 0, 0, 3, 7, 25, 13, 17, 5, 7

Offset: 0

Gus Wiseman, Oct 10 2022

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 - ...

			Triangle begins:
  1
  0  1
  0  0  2
  0  0  1  2
  0  0  1  1  3
  0  0  0  2  2  3
  0  0  0  0  5  2  4
  0  0  0  0  2  6  3  4
  0  0  0  0  2  3  9  3  5
  0  0  0  0  0  4  7 10  4  5
  0  0  0  0  0  0 11  8 13  4  6
  0  0  0  0  0  0  4 15 12 14  5  6
  0  0  0  0  0  0  3  7 25 13 17  5  7
Row n = 9 counts the following partitions:
  (3222)       (333)      (432)     (441)  (9)
  (22221)      (3321)     (522)     (531)  (54)
  (21111111)   (4221)     (4311)    (621)  (63)
  (111111111)  (32211)    (5211)    (711)  (72)
               (222111)   (6111)           (81)
               (2211111)  (33111)
               (3111111)  (42111)
                          (51111)
                          (321111)
                          (411111)

Alois P. Heinz, Rows n = 0..200, flattened

Row sums are A000041.
Number of nonzero entries in row n appears to be A004525(n+1).
Last entry of row n is A008619(n).
Column sums appear to be A029862.
The central column is A035363, skew A035544.
For original alternating sum we have A344651, ordered A097805.
The skew-alternating version is A357638.
The central column of the reverse is A357639, skew A357640.
The ordered version (compositions) is A357645, skew A357646.
The reverse version 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.
Cf. A053251, A357136, A357189, A357487, A357488, A357631, A357632, A357641.

b:= proc(n, i, s, t) option remember; `if`(n=0, x^s, `if`(i<1, 0,
      b(n, i-1, s, t)+b(n-i, min(n-i, i), s+`if`(t<2, i, -i), irem(t+1, 4))))
    end:
T:= n-> (p-> seq(coeff(p, x, i), i=-n..n, 2))(b(n$2, 0$2)):
seq(T(n), n=0..15);  # Alois P. Heinz, Oct 12 2022

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

Conjecture: The column sums are A029862.

A357638 Triangle read by rows where T(n,k) is the number of integer partitions 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, 1, 1, 1, 0, 0, 3, 1, 1, 0, 0, 1, 4, 1, 1, 0, 0, 1, 4, 4, 1, 1, 0, 0, 0, 4, 5, 4, 1, 1, 0, 0, 0, 1, 10, 5, 4, 1, 1, 0, 0, 0, 1, 5, 13, 5, 4, 1, 1, 0, 0, 0, 0, 4, 13, 14, 5, 4, 1, 1, 0, 0, 0, 0, 1, 13, 17, 14, 5, 4, 1, 1

Offset: 0

Gus Wiseman, Oct 10 2022

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 + ....

			Triangle begins:
  1
  0  1
  0  1  1
  0  1  1  1
  0  0  3  1  1
  0  0  1  4  1  1
  0  0  1  4  4  1  1
  0  0  0  4  5  4  1  1
  0  0  0  1 10  5  4  1  1
  0  0  0  1  5 13  5  4  1  1
  0  0  0  0  4 13 14  5  4  1  1
  0  0  0  0  1 13 17 14  5  4  1  1
  0  0  0  0  1  5 28 18 14  5  4  1  1
Row n = 7 counts the following partitions:
  .  .  .  (322)      (43)      (52)     (61)  (7)
           (331)      (421)     (511)
           (2221)     (3211)    (4111)
           (1111111)  (22111)   (31111)
                      (211111)

Row sums are A000041.
Number of nonzero entries in row n appears to be A004396(n+1).
First nonzero entry of each row appears to converge to A146325.
The central column is A035544, half A035363.
Column sums appear to be A298311.
For original alternating sum we have A344651, ordered A097805.
The half-alternating version is A357637.
The ordered version (compositions) is A357646, half A357645.
The reverse version is A357705, half A357704.
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.
Cf. A035594, A053251, A357136, A357189, A357486, A357487, A357488, A357624, A357631, A357632, A357636.

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

Conjecture: The columns are palindromes with sums A298311.

A357640 Number of reversed integer partitions of 2n whose skew-alternating sum is 0.

Original entry on oeis.org

1, 1, 2, 3, 6, 9, 16, 24, 40, 59, 93, 136, 208, 299, 445, 632, 921, 1292, 1848, 2563, 3610, 4954, 6881, 9353, 12835, 17290, 23469, 31357, 42150, 55889, 74463, 98038, 129573, 169476, 222339, 289029, 376618, 486773, 630313, 810285, 1043123, 1334174

Offset: 0

Gus Wiseman, Oct 11 2022

nonn

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 a(0) = 1 through a(5) = 9 partitions:
  ()  (11)  (22)    (33)      (44)        (55)
            (1111)  (2211)    (2222)      (3322)
                    (111111)  (3221)      (4321)
                              (3311)      (4411)
                              (221111)    (222211)
                              (11111111)  (322111)
                                          (331111)
                                          (22111111)
                                          (1111111111)

Alois P. Heinz, Table of n, a(n) for n = 0..250 (first 51 terms from Lucas A. Brown)
Lucas A. Brown, A357640.py.

The non-reverse half-alternating version is A035363/A035444.
The non-reverse version appears to be A035544/A035594.
These partitions are ranked by A357632, half A357631.
The half-alternating version is A357639.
A000041 counts integer partitions (also reversed integer partitions).
A316524 gives alternating sum of prime indices, reverse A344616.
A344651 counts alternating sum of partitions by length, ordered A097805.
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.
A357637 counts partitions by half-alternating sum, skew A357638.
Cf. A029862, A053251, A357136, A357189, A357487, A357488, A357636, A357641, A357645, A357704.

skats[f_]:=Sum[f[[i]]*(-1)^(1+Ceiling[(i+1)/2]),{i,Length[f]}];
Table[Length[Select[IntegerPartitions[2n],skats[Reverse[#]]==0&]],{n,0,15}]

a(31) onwards from Lucas A. Brown, Oct 19 2022

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

Gus Wiseman, Oct 12 2022

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 - ...

			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)

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.
Cf. A029862, A035363, A035544, A357136, A357631, A357639.

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}]

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

Gus Wiseman, Oct 12 2022

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 + ...

			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)

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.
Cf. A029862, A035363, A035544, A177787, A357136, A357630, A357631, A357634, A357639, A357643, A357644.

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}]

A357705 Triangle read by rows where T(n,k) is the number of reversed integer partitions 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, 0, 1, 0, 2, 2, 0, 1, 0, 3, 1, 2, 0, 1, 0, 3, 2, 3, 2, 0, 1, 0, 4, 2, 4, 1, 3, 0, 1, 0, 4, 3, 3, 6, 2, 3, 0, 1, 0, 5, 3, 5, 3, 7, 2, 4, 0, 1, 0, 5, 4, 5, 4, 9, 7, 3, 4, 0, 1, 0, 6, 4, 7, 3, 12, 5, 10, 3, 5, 0, 1

Offset: 0

Gus Wiseman, Oct 10 2022

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 + ...

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

Row sums are A000041.
First nonzero entry of each row is A004526.
The central column is A357640, half A357639.
For original alternating sum we have A344651, ordered A097805.
The half-alternating version is A357704.
The ordered non-reverse version (compositions) is A357646, half A357645.
The non-reverse version is A357638, half A357637.
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.
Cf. A035363, A035594, A053251, A298311, A357136, A357189, A357487, A357488, A357624, A357631, A357632, A357636.

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

A357707 Numbers whose prime indices have equal number of parts congruent to each of 1 and 3 (mod 4).

Original entry on oeis.org

1, 3, 7, 9, 10, 13, 19, 21, 27, 29, 30, 34, 37, 39, 43, 49, 53, 55, 57, 61, 62, 63, 70, 71, 79, 81, 87, 89, 90, 91, 94, 100, 101, 102, 107, 111, 113, 115, 117, 129, 130, 131, 133, 134, 139, 147, 151, 159, 163, 165, 166, 169, 171, 173, 181, 183, 186, 187, 189

Offset: 1

Gus Wiseman, Oct 12 2022

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.

			The terms together with their prime indices begin:
     1: {}
     3: {2}
     7: {4}
     9: {2,2}
    10: {1,3}
    13: {6}
    19: {8}
    21: {2,4}
    27: {2,2,2}
    29: {10}
    30: {1,2,3}

These partitions are counted by A035544.
Includes A066207 = products of primes of even index.
The conjugate partitions are ranked by A357636, reverse A357632.
The conjugate reverse version is A357640 (aerated).
A056239 adds up prime indices, row sums of A112798.
A316524 gives alternating sum of prime indices, reverse A344616.
A344651 counts partitions by alternating sum, ordered A097805.
A357705 counts reversed partitions by skew-alternating sum, half A357704.
Cf. A035363, A035550, A035594, A053251, A298311, A357486, A357623, A357638.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],Count[primeMS[#],?(Mod[#,4]==1&)]==Count[primeMS[#],?(Mod[#,4]==3&)]&]

cp's OEIS Frontend

A357639 Number of reversed integer partitions of 2n whose half-alternating sum is 0.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Extensions

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

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Formula

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

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A357640 Number of reversed integer partitions of 2n whose skew-alternating sum is 0.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Extensions

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.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

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.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

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

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A357707 Numbers whose prime indices have equal number of parts congruent to each of 1 and 3 (mod 4).

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs