OFFSET
1,1
EXAMPLE
For n = 1: 83 = 23 + 29 + 31 = 11 + 13 + 17 + 19 + 23, and 83 is the smallest prime that is the sum of 1, 3 and 5 consecutive primes, so a(1) = 83.
MATHEMATICA
Array[(k=1;
While[(i=Select[Intersection@@((Total/@Subsequences[Prime@Range@Prime[k++], {#}])&/@{2#-1, 2#+1, 2#+3}), PrimeQ])=={}]; First@i)&, 4] (* Giorgos Kalogeropoulos, Apr 26 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Apr 25 2021
STATUS
approved