OFFSET
1,2
COMMENTS
No others < 15000. This sequence is probably complete. According to Sander, this sequence - and the sequence for any power - is finite.
No more terms < 10^8. - Bert Dobbelaere, Jul 21 2022
LINKS
J. W. Sander, A story of binomial coefficients and primes, Amer. Math. Monthly 102 (1995), 802-807.
MATHEMATICA
t3=Table[f=FactorInteger[Binomial[2n, n]]; s=Select[f, #[[2]]>2&]; If[s=={}, 0, s[[ -1, 1]]], {n, 15000}]; Flatten[Position[t3, 0]]
PROG
(PARI) isok(n) = vecmax(factor(binomial(2*n, n))[, 2]) < 3; \\ Michel Marcus, Oct 04 2017
CROSSREFS
KEYWORD
nonn,fini,more
AUTHOR
T. D. Noe, Jul 22 2005
STATUS
approved