%I M4939 N1668 #64 Sep 08 2022 08:44:30
%S 1,14,112,672,3360,14784,59136,219648,768768,2562560,8200192,25346048,
%T 76038144,222265344,635043840,1778122752,4889837568,13231325184,
%U 35283533824,92851404800,241413652480,620777963520,1580162088960
%N a(n) = 2^n*C(n+6,6). Number of 6D hypercubes in an (n+6)-dimensional hypercube.
%C If X_1,X_2,...,X_n is a partition of a 2n-set X into 2-blocks then, for n>5, a(n-6) is equal to the number of (n+6)-subsets of X intersecting each X_i (i=1,2,...,n). - _Milan Janjic_, Jul 21 2007
%D N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
%D N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
%H Vincenzo Librandi, <a href="/A002409/b002409.txt">Table of n, a(n) for n = 0..400</a>
%H Herbert Izbicki, <a href="http://resolver.sub.uni-goettingen.de/purl?GDZPPN00247686X">Über Unterbaeume eines Baumes</a>, Monatshefte für Mathematik, Vol. 74 (1970), pp. 56-62.
%H Herbert Izbicki, <a href="http://dx.doi.org/10.1007/BF01298302">Über Unterbaeume eines Baumes</a>, Monatshefte für Mathematik, Vol. 74 (1970), pp. 56-62.
%H Milan Janjic, <a href="https://pmf.unibl.org/wp-content/uploads/2017/10/enumfor.pdf">Two Enumerative Functions</a>.
%H Milan Janjic and Boris Petkovic, <a href="http://arxiv.org/abs/1301.4550">A Counting Function</a>, arXiv:1301.4550 [math.CO], 2013.
%H Simon Plouffe, <a href="https://arxiv.org/abs/0911.4975">Approximations de séries génératrices et quelques conjectures</a>, Dissertation, Université du Québec à Montréal, 1992, arXiv:0911.4975 [math.NT], 2009.
%H Simon Plouffe, <a href="/A000051/a000051_2.pdf">1031 Generating Functions</a>, Appendix to Thesis, Montreal, 1992.
%H <a href="/index/Rec#order_07">Index entries for linear recurrences with constant coefficients</a>, signature (14,-84,280,-560,672,-448,128).
%F G.f.: 1/(1-2*x)^7.
%F a(n) = 2*a(n-1) + A054849(n-1).
%F For n>0, a(n) = 2*A082140(n).
%F a(n) = Sum_{i=6..n+6} binomial(i,6)*binomial(n+6,i). Example: for n=5, a(5) = 1*462 + 7*330 + 28*165 + 84*55 + 210*11 + 462*1 = 14784. - _Bruno Berselli_, Mar 23 2018
%F From _Amiram Eldar_, Jan 06 2022: (Start)
%F Sum_{n>=0} 1/a(n) = 47/5 - 12*log(2).
%F Sum_{n>=0} (-1)^n/a(n) = 2916*log(3/2) - 5907/5. (End)
%p A002409:=-1/(2*z-1)**7; # _Simon Plouffe_ in his 1992 dissertation
%p seq(binomial(n+6,6)*2^n,n=0..22); # _Zerinvary Lajos_, Jun 16 2008
%t CoefficientList[Series[1/(1-2x)^7,{x,0,40}],x] (* or *) LinearRecurrence[ {14,-84,280,-560,672,-448,128},{1,14,112,672,3360,14784,59136},40] (* _Harvey P. Dale_, Jan 24 2022 *)
%o (Magma) [2^n*Binomial(n+6, 6): n in [0..30]]; // _Vincenzo Librandi_, Oct 14 2011
%Y First differences are in A006976.
%Y Cf. A000079, A001787, A001788, A001789, A003472, A054849, A054851, A082140.
%Y a(n) = A038207(n+6,6).
%K nonn,easy
%O 0,2
%A _N. J. A. Sloane_
%E More terms from _Henry Bottomley_ and _James A. Sellers_, Apr 15 2000
%E Typo in definition corrected by _Zerinvary Lajos_, Jun 16 2008