login
A289486
G.f.: Product_{m>0} (1 + x^m + 2!*x^(2*m) + 3!*x^(3*m) + 4!*x^(4*m)).
3
1, 1, 3, 8, 30, 13, 48, 61, 142, 170, 378, 430, 1099, 872, 1304, 2305, 3626, 4042, 6900, 8086, 13634, 17628, 24915, 29524, 53998, 51718, 74953, 96996, 150104, 172292, 234938, 296472, 416064, 504132, 690826, 812625, 1184134, 1378774, 1823778, 2264576, 3115051
OFFSET
0,3
LINKS
MAPLE
b:= proc(n, i) option remember; `if`(n=0, 1, `if`(i<1, 0,
add(b(n-i*j, i-1)*j!, j=0..min(4, n/i))))
end:
a:= n-> b(n$2):
seq(a(n), n=0..50); # Alois P. Heinz, Oct 04 2017
CROSSREFS
Column k=4 of A293202.
Sequence in context: A207828 A208678 A162054 * A245361 A247340 A067354
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Oct 03 2017
STATUS
approved