|
%I #40 Feb 15 2023 13:32:13
%S 1,2,6,56,1820,201376,74974368,94525795200,409663695276000,
%T 6208116950265950720,334265867498622145619456,
%U 64832175068736596027448301568,45811862025512780638750907861652480,119028707533461499951701664512286557511680
%N a(n) = binomial(2^n, n).
%C a(n) is the number of n X n (0,1) matrices with distinct rows modulo rows permutations. - Yuval Dekel (dekelyuval(AT)hotmail.com), Nov 13 2003
%H Vincenzo Librandi, <a href="/A014070/b014070.txt">Table of n, a(n) for n = 0..60</a>
%F G.f.: A(x) = Sum_{n>=0} log(1 + 2^n*x)^n / n!. - _Paul D. Hanna_, Dec 28 2007
%F a(n) = (1/n!) * Sum_{k=0..n} Stirling1(n, k) * 2^(n*k). - _Paul D. Hanna_, Feb 05 2023
%F From _Vaclav Kotesovec_, Jul 02 2016: (Start)
%F a(n) ~ 2^(n^2) / n!.
%F a(n) ~ 2^(n^2 - 1/2) * exp(n) / (sqrt(Pi) * n^(n+1/2)).
%F (End)
%p A014070:= n-> binomial(2^n,n); seq(A014070(n), n=0..20); # _G. C. Greubel_, Mar 14 2021
%t Table[Binomial[2^n,n],{n,0,20}] (* _Vladimir Joseph Stephan Orlovsky_, Mar 03 2011 *)
%o (PARI) a(n)=binomial(2^n,n)
%o (PARI) /* G.f. A(x) as Sum of Series: */
%o a(n)=polcoeff(sum(k=0,n,log(1+2^k*x +x*O(x^n))^k/k!),n) \\ _Paul D. Hanna_, Dec 28 2007
%o (PARI) {a(n) = (1/n!) * sum(k=0,n, stirling(n, k, 1) * 2^(n*k) )}
%o for(n=0,20,print1(a(n),", ")) \\ _Paul D. Hanna_, Feb 05 2023
%o (Magma) [Binomial(2^n, n): n in [0..25]]; // _Vincenzo Librandi_, Sep 13 2016
%o (Sage) [binomial(2^n, n) for n in (0..20)] # _G. C. Greubel_, Mar 14 2021
%Y Sequences of the form binomial(2^n +p*n +q, n): A136556 (0,-1), this sequence (0,0), A136505 (0,1), A136506 (0,2), A060690 (1,-1), A132683 (1,0), A132684 (1,1), A132685 (2,0), A132686 (2,1), A132687 (3,-1), A132688 (3,0), A132689 (3,1).
%Y Cf. A088229, A136393, A136555.
%K nonn,easy
%O 0,2
%A _N. J. A. Sloane_
|
