login
Three-fold convolution of primes with themselves.
2

%I #11 Feb 01 2021 18:59:44

%S 8,36,114,291,669,1386,2678,4851,8373,13858,22134,34263,51635,75972,

%T 109374,154483,214383,292812,394148,523521,686901,891112,1143936,

%U 1454187,1831973,2288400,2836044,3488969,4262541,5173836,6241612,7486437,8930649,10598848

%N Three-fold convolution of primes with themselves.

%F From _Mario C. Enriquez_, Dec 13 2016: (Start)

%F G.f: (b(x)^3)/(x^2), where b(x) is the g.f. of A000040.

%F a(n) = Sum_{k=0..n} A014342(n-k+1)*A000040(k+1).

%F (End)

%t 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 *)

%Y Cf. A000040, A014342.

%Y Column k=3 of A340991.

%K nonn

%O 0,1

%A _N. J. A. Sloane_.