A258363 Sum over all partitions lambda of n into 8 distinct parts of Product_{i:lambda} prime(i).
9699690, 11741730, 27927900, 49533330, 98525490, 170218830, 325872714, 562212782, 1032566057, 1629661685, 2724030632, 4284584225, 6990871609, 10713813287, 17001782121, 25600766613, 39614085330, 58088625761, 87187552970, 126762441906, 186103726454, 266554756593
Offset: 36
Keywords
Links
- Alois P. Heinz, Table of n, a(n) for n = 36..1000
Programs
-
Maple
g:= proc(n, i) option remember; convert(series(`if`(n=0, 1, `if`(i<1, 0, add(g(n-i*j, i-1)*(ithprime(i)*x)^j , j=0..min(1, n/i)))), x, 9), polynom) end: a:= n-> coeff(g(n$2), x, 8): seq(a(n), n=36..60);