login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A094034 Number of connected 3-element antichains on a labeled n-set. 3
0, 0, 0, 1, 38, 645, 7510, 71981, 617358, 4947685, 37972070, 283229661, 2072354878, 14964711125, 107078983830, 761312910541, 5388481567598, 38017703680965, 267622831854790, 1880882526962621, 13203901505935518, 92616363612417205 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,5
LINKS
Index entries for linear recurrences with constant coefficients, signature (22,-190,820,-1849,2038,-840).
FORMULA
E.g.f.: (exp(7*x) - 6*exp(5*x) + 3*exp(4*x) + 14*exp(3*x) - 21*exp(2*x) + 11*exp(x) -2)/3!.
G.f.: -x^3*(5*x+1)*(56*x^2-11*x-1) / ((x-1)*(2*x-1)*(3*x-1)*(4*x-1)*(5*x-1)*(7*x-1)). - Colin Barker, Nov 27 2012
MATHEMATICA
With[{nmax = 50}, CoefficientList[Series[(Exp[7*x] - 6*Exp[5*x] + 3*Exp[4*x] + 14*Exp[3*x] - 21*Exp[2*x] + 11*Exp[x] - 2)/3!, {x, 0, nmax}], x] Range[0, nmax]!] (* G. C. Greubel, Oct 07 2017 *)
LinearRecurrence[{22, -190, 820, -1849, 2038, -840}, {0, 0, 0, 1, 38, 645, 7510}, 30] (* Harvey P. Dale, Sep 20 2022 *)
PROG
(PARI) x='x+O('x^50); concat([0, 0, 0], Vec(-x^3*(5*x+1)*(56*x^2-11*x-1)/( (x-1)*(2*x-1)*(3*x-1)*(4*x-1)*(5*x-1)*(7*x-1)))) \\ G. C. Greubel, Oct 07 2017
CROSSREFS
Sequence in context: A243820 A268765 A202715 * A020931 A089271 A195912
KEYWORD
nonn,easy
AUTHOR
Goran Kilibarda, Vladeta Jovovic, Apr 22 2004
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 04:58 EDT 2024. Contains 371235 sequences. (Running on oeis4.)