OFFSET
0,2
COMMENTS
If Y is a 2-subset of an n-set X then, for n>=6, a(n-6) is the number of 6-subsets of X which do not have exactly one element in common with Y. - Milan Janjic, Dec 28 2007
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Alexsandar Petojevic, The Function vM_m(s; a; z) and Some Well-Known Sequences, Journal of Integer Sequences, Vol. 5 (2002), Article 02.1.7
Index entries for linear recurrences with constant coefficients, signature (7,-21,35,-35,21,-7,1).
FORMULA
a(n) = (n+1)(n+2)(n+3)(n+4)(n^2-n+30)/720.
a(n-4) = binomial(n,6) + binomial(n,4) for n>3. - Zerinvary Lajos, Jul 24 2006
G.f.: (1-2*x+2*x^2)/(1-x)^7. - Colin Barker, Feb 22 2012
MAPLE
seq(binomial(n+4, 6)+binomial(n+4, 4), n=0..33) # Zerinvary Lajos, Jul 24 2006
MATHEMATICA
a=1; b=2; c=3; d=4; s=5; lst={1, s}; Do[a+=n; b+=a; c+=b; d+=c; s+=d; AppendTo[lst, s], {n, 6!}]; lst (* Vladimir Joseph Stephan Orlovsky, May 24 2009 *)
LinearRecurrence[{7, -21, 35, -35, 21, -7, 1}, {1, 5, 16, 42, 98, 210, 420}, 50] (* Vincenzo Librandi, Apr 30 2012 *)
Table[(n+1)(n+2)(n+3)(n+4)(n^2-n+30)/720, {n, 0, 50}] (* Harvey P. Dale, Feb 12 2013 *)
PROG
(Magma) [(n+1)*(n+2)*(n+3)*(n+4)*(n^2-n+30)/720: n in [0..40]]; // Vincenzo Librandi, Apr 30 2012
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, May 28 2000
EXTENSIONS
More terms from Harvey P. Dale, Feb 12 2013
STATUS
approved