1,1
Next term is bigger than 2000. - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Jul 21 2006
Select[Prime[Range[303]], IntegerQ[Sum[(Binomial[2n, n]/(n + 1))^2, {n, 0, #}]/# ] &] - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Jul 21 2006
Cf. A094639.
Sequence in context: A031030 A083689 A102617 * A006962 A090819 A059697
Adjacent sequences: A120273 A120274 A120275 * A120277 A120278 A120279
nonn
Alexander Adamchuk (alex(AT)kolmogorov.com), Jul 04 2006