OFFSET
1,1
LINKS
Paolo Xausa, Table of n, a(n) for n = 1..10000
MATHEMATICA
NextPrime[ListConvolve[{1, 1}, Prime[Range[100]]]+1, -1] (* Paolo Xausa, Nov 02 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Jul 28 2004
STATUS
approved