A360791 Sum of all prime encoded complete partitions of n.
1, 2, 4, 14, 28, 94, 218, 588, 1366, 3618, 8134, 20320, 45592, 105810, 236960, 539392, 1174530, 2612436, 5628606, 12226350, 26130568, 55938126, 117997774, 249680514, 523032956, 1094500962, 2275886514, 4727461792, 9762182762, 20148991512, 41403646304, 84961079990
Offset: 0
Keywords
Links
- Alois P. Heinz, Table of n, a(n) for n = 0..3316
Programs
-
Maple
b:= proc(n, i) option remember; `if`(i<2, 2^n, `if`(n<2*i-1, b(n, iquo(n+1, 2)), b(n, i-1)+b(n-i, i)*ithprime(i))) end: a:= n-> b(n, iquo(n+1, 2)): seq(a(n), n=0..32);