A341988 Number of ways to write n as an ordered sum of 9 primes (counting 1 as a prime).
1, 9, 45, 156, 423, 954, 1887, 3384, 5661, 8935, 13446, 19332, 26838, 36126, 47691, 61668, 78696, 98631, 122665, 150516, 184230, 222438, 268146, 318564, 379383, 445572, 525942, 610344, 712872, 817290, 947166, 1075680, 1238148, 1391475, 1591236, 1773684, 2022241
Offset: 9
Keywords
Crossrefs
Programs
-
Mathematica
nmax = 45; CoefficientList[Series[(x + Sum[x^Prime[k], {k, 1, nmax}])^9, {x, 0, nmax}], x] // Drop[#, 9] &
Formula
G.f.: ( x + Sum_{k>=1} x^prime(k) )^9.