OFFSET
0,2
LINKS
Max Alekseyev, Table of n, a(n) for n = 0..10395
Robert G. Wilson v and Max Alekseyev, Table of n, a(n) for n = 0..100000, with unknown terms marked by -1 (contains values below 10^8).
EXAMPLE
a(3)=9 because partition number of 9 is 30 == 3 modulo 9,
a(5)=74 because partition number of 74 is 7089500 == 5 modulo 74, etc.
MATHEMATICA
t = Table[0, {10000}]; k = 1; While[k < 475000, a = Mod[ PartitionsP@k, k]; If[a < 10001 && t[[a]] == 0, t[[a]] = k; Print[{a, k}]]; k++ ]; t (* Robert G. Wilson v, Jul 16 2009 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Sep 02 2006
EXTENSIONS
b-file extended by Max Alekseyev, Jun 13 2011, May 19 2014
STATUS
approved