|
Search: id:A113236
|
|
|
| A113236 |
|
Number of partitions of {1,..,n} into any number of lists of size not equal to 3, where a list means an ordered subset, cf. A000262. |
|
+0
3
|
|
| 1, 1, 3, 7, 49, 321, 2851, 24823, 256257, 2887489, 36759331, 507010791, 7597222513, 122184356737, 2106356007939, 38693238713431, 754792977928321, 15572911248409473, 338800604611562947
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
FORMULA
|
E.g.f.: exp(x*(1-x^2+x^3)/(1-x)) Expression as a sum involving generalized Laguerre polynomials, in Mathematica notation: a(n)=n!*Sum[(-1)^k*LaguerreL[n - 3*k, -1, -1]/k!, {k, 0, Floor[n/3]}], n=0, 1....
|
|
MATHEMATICA
|
Range[0, 18]!*CoefficientList[ Series[ Exp[x*(1-x^2+x^3)/(1 - x)], {x, 0, 18}], x] - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Mar 23 2007
|
|
CROSSREFS
|
Cf. A052845, A113235.
Sequence in context: A062959 A118393 A113775 this_sequence A035499 A120788 A041277
Adjacent sequences: A113233 A113234 A113235 this_sequence A113237 A113238 A113239
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Karol A. Penson (penson(AT)lptl.jussieu.fr), Oct 19 2005
|
|
|
Search completed in 0.002 seconds
|
