A289486 G.f.: Product_{m>0} (1 + x^m + 2!*x^(2*m) + 3!*x^(3*m) + 4!*x^(4*m)).

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

Author

Seiichi Manyama, Oct 03 2017

Keywords

• nonn

Links

• Seiichi Manyama, Table of n, a(n) for n = 0..500

Crossrefs

Column k=4 of A293202.

Programs

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