|
|
A055484
|
|
Number of unlabeled 3-element intersecting families (with not necessarily distinct sets) of an n-element set.
|
|
3
|
|
|
1, 4, 14, 39, 96, 213, 437, 837, 1520, 2632, 4380, 7040, 10979, 16668, 24716, 35879, 51104, 71549, 98625, 134025, 179782, 238292, 312386, 405368, 521083, 663968, 839140, 1052439, 1310534, 1620985, 1992343, 2434229, 2957458, 3574108
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
Index entries for linear recurrences with constant coefficients, signature (4, -4, -2, 2, 4, 3, -12, 3, 4, 2, -2, -4, 4, -1).
|
|
FORMULA
|
G.f.: -x*(x^3-x^2-1)*(x^6+x^4+2*x^3+x^2+1)/((x^3-1)^2*(x^2-1)^2*(x-1)^4).
|
|
MATHEMATICA
|
Rest[CoefficientList[Series[-x*(x^3 - x^2 - 1)*(x^6 + x^4 + 2*x^3 + x^2 + 1)/((x^3 - 1)^2*(x^2 - 1)^2*(x - 1)^4), {x, 0, 50}], x]] (* G. C. Greubel, Oct 06 2017 *)
|
|
PROG
|
(PARI) x='x+O('x^50); Vec(-x*(x^3-x^2-1)*(x^6+x^4+2*x^3+x^2+1)/( (x^3-1)^2*(x^2-1)^2*(x-1)^4)) \\ G. C. Greubel, Oct 06 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|