A024455 [ (3rd elementary symmetric function of P(n))/(2nd elementary symmetric function of P(n)) ], where P(n) = {first n+2 primes}.

0, 2, 4, 7, 11, 17, 23, 30, 39, 50, 61, 74, 88, 104, 121, 140, 160, 182, 204, 228, 254, 282, 312, 343, 376, 409, 444, 480, 519, 561, 604, 648, 695, 743, 793, 845, 898, 954, 1011, 1069, 1130, 1192, 1256

Offset

1,2

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Maple

P:= [seq(ithprime(i), i=1..102)]:
PS:= ListTools:-PartialSums(P):
S2:= P[1]*P[2]:
S3:= 0:
for n from 1 to 100 do
  S3:= S3 + P[n+2]*S2;
  S2:= S2 + P[n+2]*PS[n+1];
  A[n]:= floor(S3/S2);
od:
seq(A[i], i=1..100); # Robert Israel, Mar 29 2017

Crossrefs

Sequence in context: A266448 A101978 A076273 * A038045 A178063 A095233

Adjacent sequences: A024452 A024453 A024454 * A024456 A024457 A024458

Keyword

nonn

Author

Clark Kimberling

Status

approved