OFFSET
1,1
COMMENTS
The corresponding values of n are in A067366.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..53 (* The next term, a(54), has 1244 digits. *)
EXAMPLE
For n=5 the central binomial coefficient is C(5,2)=10. Since 10+1=11 is prime, it is in the sequence.
MATHEMATICA
For[ n=0, True, n++, If[ PrimeQ[ z=Binomial[ n, Floor[ n/2 ] ]+1 ], Print[ z ] ] ]
Select[Table[1+Binomial[n, Floor[n/2]], {n, 100}], PrimeQ] (* Harvey P. Dale, Nov 24 2018 *)
PROG
(MuPAD) for n from 0 to 200 do p := binomial(n, floor(n/2))+1: if isprime(p) then print(p) end_if end_for
CROSSREFS
KEYWORD
nonn
AUTHOR
Frank Buss (fb(AT)frank-buss.de), Jan 16 2002
EXTENSIONS
Repetitions removed by N. J. A. Sloane, Apr 09 2008
STATUS
approved