OFFSET
1,2
COMMENTS
For p prime > 3, Joseph Wolstenholme showed in 1862 that a(p)=1. - corrected by Jonathan Sondow, Jan 24 2016
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(11) = 352716 mod 1331 = 1.
MAPLE
seq(binomial(2*n-1, n-1) mod n^3, n=1..100); # Robert Israel, Jan 24 2016
MATHEMATICA
Table[Mod[Binomial[2 n - 1, n - 1], n^3], {n, 1, 50}] (* Vincenzo Librandi, Jan 24 2016 *)
PROG
(PARI) a(n) = binomial(2*n-1, n-1) % n^3; \\ Michel Marcus, Jan 24 2016
(Magma) [Binomial(2*n-1, n-1) mod n^3: n in [1..50]]; // Vincenzo Librandi, Jan 24 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Henry Bottomley, Oct 29 2004
STATUS
approved