[go: up one dir, main page]

login
A024455
[ (3rd elementary symmetric function of P(n))/(2nd elementary symmetric function of P(n)) ], where P(n) = {first n+2 primes}.
1
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
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
KEYWORD
nonn
STATUS
approved