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

1, 1, 3, 8, 6, 13, 24, 37, 46, 98, 90, 142, 235, 296, 392, 601, 746, 1018, 1428, 1702, 2258, 3132, 3891, 5044, 6766, 8134, 10681, 13812, 16952, 20996, 27986, 33144, 41376, 52500, 64066, 79401, 99718, 119590, 147162, 181880, 220339, 266662, 329342, 391736

Offset

0,3

Links

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

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(3, n/i))))
    end:
a:= n-> b(n$2):
seq(a(n), n=0..50);  # Alois P. Heinz, Oct 04 2017

Prog

(PARI) Vec(prod(m=1, 50, 1+x^m+2*x^(2*m)+6*x^(3*m)) + O(x^50)) \\ Michel Marcus, Oct 04 2017

Crossrefs

Column k=3 of A293202.

Sequence in context: A295573 A080939 A155724 * A304299 A221951 A276574

Adjacent sequences: A289482 A289483 A289484 * A289486 A289487 A289488

Keyword

nonn

Author

Seiichi Manyama, Oct 03 2017

Status

approved