A359292 a(n) = least prime > binomial(2n, n).

2, 3, 7, 23, 71, 257, 929, 3433, 12889, 48623, 184777, 705437, 2704157, 10400603, 40116607, 155117551, 601080433, 2333606281, 9075135317, 35345263801, 137846528921, 538257874499, 2104098963721, 8233430727611, 32247603683111, 126410606437757, 495918532948117

Offset

0,1

Links

Table of n, a(n) for n=0..26.

Mathematica

z = 70;
t = Table[Binomial[2 n, n], {n, 1, z}];
NextPrime[t]

Prog

(PARI) a(n) = nextprime(binomial(2*n, n)+1); \\ Michel Marcus, Dec 24 2022

Crossrefs

Cf. A000040, A000984, A359293, A359294.

Sequence in context: A084710 A088173 A129739 * A163834 A335366 A002386

Adjacent sequences: A359289 A359290 A359291 * A359293 A359294 A359295

Keyword

nonn

Author

Clark Kimberling, Dec 24 2022

Status

approved