OFFSET
1,2
COMMENTS
a(16) > 156000. - Michael S. Branicky, Jun 26 2025
FORMULA
a(n) = A134775(n) - 1. - Michael S. Branicky, Jun 24 2025
MAPLE
s[0]:=1: for n to 1000 do s[n]:= s[n-1]+binomial(2*n+2, n+1)/(n+2) end do: a:= proc (n) if isprime(s[n]) = true then n else end if end proc: seq(a(n), n= 0.. 1000); # Emeric Deutsch, Aug 28 2007
MATHEMATICA
s = 0; Do[s = s + (2n)!/n!/(n+1)!; If[ PrimeQ[s], Print[n-1]], {n, 200}]
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Alexander Adamchuk, Feb 23 2007
EXTENSIONS
a(7)-a(9) from Emeric Deutsch, Aug 28 2007
Name clarified by Jon E. Schoenfield, Mar 25 2019
a(10)-a(15) from Michael S. Branicky, Jun 25 2025
STATUS
approved
