A036480 a(n) = partition(11n+7) mod 11.

4, 0, 0, 4, 0, 0, 4, 0, 4, 4, 0, 0, 4, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 8, 4, 4, 8, 8, 4, 8, 8, 8, 1, 8, 8, 1, 8, 1, 1, 1, 1, 5, 1, 5, 5, 5, 5, 9, 5, 9, 9, 9, 9, 2, 2, 6, 6, 6, 6, 10, 6, 10, 3, 3, 3, 7, 3, 7, 0, 0, 0, 8, 4, 8, 1, 1, 1, 9, 5, 2, 2, 2, 6, 3, 10, 3, 7, 0, 0, 8, 8, 1, 5, 9, 9, 10, 6, 3, 7, 0, 0, 1

Offset

0,1

Links

Amiram Eldar, Table of n, a(n) for n = 0..10000

Formula

a(n) = A020919(11*n + 7). - Amiram Eldar, Aug 01 2025

Mathematica

a[n_] := Mod[PartitionsP[11*n + 7], 11]; Array[a, 100, 0] (* Amiram Eldar, Aug 01 2025 *)

Prog

(PARI) a(n) = numbpart(11*n + 7) % 11; \\ Amiram Eldar, Aug 01 2025

Crossrefs

Cf. A000041, A020919.

partition(11n+k): A036485 (k=0), A036475 (k=1), A036476 (k=2), A036477 (k=3), A036478 (k=4), A036479 (k=5), A000004 (k=6), this sequence (k=7), A036481 (k=8), A036482 (k=9), A036483 (k=10).

Sequence in context: A308278 A308277 A278216 * A035639 A284689 A037214

Adjacent sequences: A036477 A036478 A036479 * A036481 A036482 A036483

Keyword

nonn,easy

Author

David W. Wilson

Extensions

Offset corrected by Amiram Eldar, Aug 01 2025

Status

approved