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 this_sequence A006962 A090819 A059697

Adjacent sequences: A120273 A120274 A120275 this_sequence A120277 A120278 A120279

nonn

Alexander Adamchuk (alex(AT)kolmogorov.com), Jul 04 2006