A068907 Number of partitions of n modulo 3.
1, 1, 2, 0, 2, 1, 2, 0, 1, 0, 0, 2, 2, 2, 0, 2, 0, 0, 1, 1, 0, 0, 0, 1, 0, 2, 0, 1, 1, 2, 0, 2, 0, 0, 1, 0, 1, 1, 2, 0, 0, 0, 2, 0, 1, 1, 0, 2, 0, 2, 1, 0, 0, 0, 1, 1, 2, 0, 2, 1, 2, 0, 1, 0, 1, 2, 2, 2, 0, 2, 0, 0, 1, 1, 2, 0, 2, 1, 2, 2, 0, 1, 1, 2, 2, 2, 1, 2, 0, 1, 2, 1, 2, 2, 2, 1, 2, 0, 1, 1, 1, 2, 0, 2, 0
Offset: 0
Keywords
Links
Programs
-
Mathematica
Table[ Mod[ PartitionsP@ n, 3], {n, 105}] (* Robert G. Wilson v, Mar 25 2011 *)
-
PARI
a(n) = numbpart(n) % 3; \\ Michel Marcus, Jul 14 2022
Comments