A014343 Three-fold convolution of primes with themselves.
8, 36, 114, 291, 669, 1386, 2678, 4851, 8373, 13858, 22134, 34263, 51635, 75972, 109374, 154483, 214383, 292812, 394148, 523521, 686901, 891112, 1143936, 1454187, 1831973, 2288400, 2836044, 3488969, 4262541, 5173836, 6241612, 7486437, 8930649, 10598848
Offset: 0
Keywords
Programs
-
Mathematica
Table[Sum[Prime[k + 1] Sum[Prime[i] Prime[# + 1 - i], {i, #}] &[n - k + 1], {k, 0, n}], {n, 0, 26}] (* Michael De Vlieger, Dec 13 2016 *)
Formula
From Mario C. Enriquez, Dec 13 2016: (Start)
G.f: (b(x)^3)/(x^2), where b(x) is the g.f. of A000040.
(End)