A240994 Partial sums of A086505.

10, 21, 44, 75, 104, 157, 230, 283, 372, 529, 602, 739, 938, 1011, 1292, 1521, 1521, 1648, 2031, 2260, 2409, 2798, 3261, 3454, 3813, 4360, 4599, 5066, 5889, 6068

Offset: 2

Author

Samuel J. Erickson, Aug 06 2014

Keywords

• nonn

Examples

			The second term is obtained by taking the trace of the matrix [[3,5,11],[3,7,13],[5,7,11]].
		

Crossrefs

Cf. A086505.

Programs

Maple

Primes:= select(isprime,{seq(2*i+1,i=1..10^5)}):
T:= 3:
for n from 2 to 100 do
  R:= Primes intersect map(`+`,Primes, -2*n);
  if nops(R) < n then break fi;
  T:= T + R[n];
  A[n]:= T;
od:
seq(A[n],n=2..100); # Robert Israel, Aug 06 2014

Extensions

Entry revised by Robert Israel, Aug 07 2014 and N. J. A. Sloane, Sep 30 2014