OFFSET
1,2
COMMENTS
a(16843)=a(2124679)=1 meaning that 16843 and 2124679 are Wolstenholme primes A088164.
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..10000
EXAMPLE
a(11) =352716 mod 1461 =1332.
MATHEMATICA
Table[Mod[Binomial[2n-1, n-1], n^4], {n, 40}] (* Harvey P. Dale, Dec 12 2021 *)
PROG
(Python)
from __future__ import division
A099908_list, b = [], 1
for n in range(1, 10001):
A099908_list.append(b % n**4)
b = b*2*(2*n+1)//(n+1) # Chai Wah Wu, Jan 26 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Henry Bottomley, Oct 29 2004
STATUS
approved