A185041 a(n) = number of partitions of 10^n mod 10

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

Offset

0,2

Comments

p(10^n) mod 10 where p(n) = A000041(n)

Links

Table of n, a(n) for n=0..19.

Example

p(10^2) = 190569292, so a(2) = 2

Mathematica

Table[Mod[PartitionsP[10^n], 10], {n, 0, 6}]

Prog

(PARI) a(n)=numbpart(10^n)%10 \\ Charles R Greathouse IV, Apr 06 2016

Crossrefs

Equals A070177(n) mod 10

Sequence in context: A158985 A295687 A087854 * A086873 A101560 A307456

Adjacent sequences: A185038 A185039 A185040 * A185042 A185043 A185044

Keyword

nonn

Author

Fredrik Johansson, Jan 23 2012

Status

approved