[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Revision History for A351007 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing all changes.
Number of even-length integer partitions of n into parts that are alternately unequal and equal.
(history; published version)
#7 by Susanna Cuyler at Sun Feb 06 23:10:40 EST 2022
STATUS

proposed

approved

#6 by Gus Wiseman at Thu Feb 03 13:32:50 EST 2022
STATUS

editing

proposed

#5 by Gus Wiseman at Thu Feb 03 13:30:59 EST 2022
NAME

Number of even-length integer partitions of n into parts that are alternately unequal and equal.

STATUS

proposed

editing

#4 by Gus Wiseman at Tue Feb 01 00:57:49 EST 2022
STATUS

editing

proposed

#3 by Gus Wiseman at Tue Feb 01 00:57:43 EST 2022
COMMENTS

These are partitions whose run-lengths multiplicities begin with a 1, are followed by any number of 2's, and end with another 1.

CROSSREFS

Not requiring the Without equalities gives we have A351008, any length A122129, opposite A122135.

The non-strict version is Without inequalities we have A351012, any length A351003, opposite A351004.

Cf. A000070, A003242, A018819, A027383, `A035363, `A087897, `A088218, `A101417, A122134, `A344605, ~A345194, ~A350837, ~A350839, A350842, A350844, `A351011.

#2 by Gus Wiseman at Mon Jan 31 20:15:43 EST 2022
NAME

allocated for Gus WisemanNumber of even-length integer partitions of n that are alternately unequal and equal.

DATA

1, 0, 0, 1, 1, 2, 2, 3, 4, 5, 5, 7, 8, 9, 10, 13, 14, 16, 18, 20, 23, 27, 28, 32, 37, 40, 44, 51, 54, 60, 67, 73, 81, 90, 96, 107, 118, 127, 139, 154, 166, 181, 198, 213, 232, 256, 273, 297, 325, 348, 377, 411, 440, 476, 516, 555, 598, 647, 692, 746, 807

OFFSET

0,6

COMMENTS

These are partitions whose run-lengths begin with 1, are followed by any number of 2's, and end with another 1.

EXAMPLE

The a(3) = 1 through a(15) = 13 partitions (A..E = 10..14):

21 31 32 42 43 53 54 64 65 75 76 86 87

41 51 52 62 63 73 74 84 85 95 96

61 71 72 82 83 93 94 A4 A5

3221 81 91 92 A2 A3 B3 B4

4221 5221 A1 B1 B2 C2 C3

4331 4332 C1 D1 D2

6221 5331 5332 5441 E1

7221 6331 6332 5442

8221 7331 6441

9221 7332

8331

A221

433221

MATHEMATICA

Table[Length[Select[IntegerPartitions[n], EvenQ[Length[#]]&&And@@Table[#[[i]]==#[[i+1]], {i, 2, Length[#]-1, 2}]&&And@@Table[#[[i]]!=#[[i+1]], {i, 1, Length[#]-1, 2}]&]], {n, 0, 30}]

CROSSREFS

The alternately equal and unequal version is A035457, any length A351005.

This is the even-length case of A351006, odd-length A053251.

Not requiring the equalities gives A351008, any length A122129, opposite A122135.

The non-strict version is A351012, any length A351003, opposite A351004.

Cf. A000070, A003242, A018819, A027383, `A035363, `A087897, `A088218, `A101417, A122134, `A344605, ~A345194, ~A350837, ~A350839, A350842, A350844, `A351011.

KEYWORD

allocated

nonn

AUTHOR

Gus Wiseman, Jan 31 2022

STATUS

approved

editing

#1 by Gus Wiseman at Fri Jan 28 23:12:07 EST 2022
NAME

allocated for Gus Wiseman

KEYWORD

allocated

STATUS

approved