login
12th binomial transform of (0,0,1,0,0,0,...).
13

%I #36 Sep 08 2022 08:45:09

%S 0,0,1,36,864,17280,311040,5225472,83607552,1289945088,19349176320,

%T 283787919360,4086546038784,57954652913664,811365140791296,

%U 11234286564802560,154070215745863680,2095354934143746048

%N 12th binomial transform of (0,0,1,0,0,0,...).

%C Starting at 1, the three-fold convolution of A001021 (powers of 12).

%H Vincenzo Librandi, <a href="/A081142/b081142.txt">Table of n, a(n) for n = 0..400</a>

%H <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (36,-432,1728).

%F a(n) = 36*a(n-1) - 432*a(n-2) + 1728*a(n-3), a(0) = a(1) = 0, a(2) = 1.

%F a(n) = 12^(n-2)*binomial(n, 2).

%F G.f.: x^2/(1 - 12*x)^3.

%F a(n) = 2^(2*n-5)*3^(n-2)*n*(n-1). - _Harvey P. Dale_, Jul 25 2013

%F E.g.f.: (1/2)*exp(12*x)*x^2. - _Franck Maminirina Ramaharo_, Nov 23 2018

%F From _Amiram Eldar_, Jan 06 2022: (Start)

%F Sum_{n>=2} 1/a(n) = 24 - 264*log(12/11).

%F Sum_{n>=2} (-1)^n/a(n) = 312*log(13/12) - 24. (End)

%p seq(coeff(series(x^2/(1-12*x)^3,x,n+1), x, n), n = 0 .. 20); # _Muniru A Asiru_, Nov 24 2018

%t LinearRecurrence[{36,-432,1728},{0,0,1},30] (* or *) Table[(n-1) (n-2) 3^(n-3) 2^(2n-7),{n,20}] (* _Harvey P. Dale_, Jul 25 2013 *)

%o (Magma) [12^(n-2)* Binomial(n, 2): n in [0..20]]; // _Vincenzo Librandi_, Oct 16 2011

%o (PARI) vector(20, n, n--; 2^(2*n-5)*3^(n-2)*n*(n-1)) \\ _G. C. Greubel_, Nov 23 2018

%o (Sage) [2^(2*n-5)*3^(n-2)*n*(n-1) for n in range(20)] # _G. C. Greubel_, Nov 23 2018

%o (GAP) List([0..20],n->12^(n-2)*Binomial(n,2)); # _Muniru A Asiru_, Nov 24 2018

%Y Cf. A001021.

%Y Sequences similar to the form q^(n-2)*binomial(n, 2): A000217 (q=1), A001788 (q=2), A027472 (q=3), A038845 (q=4), A081135 (q=5), A081136 (q=6), A027474 (q=7), A081138 (q=8), A081139 (q=9), A081140 (q=10), A081141 (q=11), this sequence (q=12), A027476 (q=15).

%K easy,nonn

%O 0,4

%A _Paul Barry_, Mar 08 2003