OFFSET
1,3
COMMENTS
The corresponding primes are in A066749.
MATHEMATICA
For[ n=0, True, n++, If[ PrimeQ[ Binomial[ n, Floor[ n/2 ] ]+1 ], Print[ n ] ] ]
CROSSREFS
KEYWORD
nonn
AUTHOR
Dean Hickerson, Jan 20 2002
STATUS
approved