|
%I #31 Sep 08 2022 08:44:41
%S 0,4096,16777216,2176782336,68719476736,1000000000000,8916100448256,
%T 56693912375296,281474976710656,1156831381426176,4096000000000000,
%U 12855002631049216,36520347436056576,95428956661682176,232218265089212416,531441000000000000,1152921504606846976
%N a(n) = (2*n)^12.
%H Vincenzo Librandi, <a href="/A016752/b016752.txt">Table of n, a(n) for n = 0..10000</a>
%H <a href="/index/Rec#order_13">Index entries for linear recurrences with constant coefficients</a>, signature (13,-78,286,-715,1287,-1716,1716,-1287,715,-286,78,-13,1).
%F From _Amiram Eldar_, Oct 11 2020: (Start)
%F Sum_{n>=1} 1/a(n) = 691*Pi^12/2615348736000.
%F Sum_{n>=1} (-1)^(n+1)/a(n) = 1414477*Pi^12/5356234211328000. (End)
%p A016752:=n->(2*n)^12: seq(A016752(n), n=0..30); # _Wesley Ivan Hurt_, Sep 15 2018
%t (2*Range[0,20])^12 (* or *) LinearRecurrence[{13,-78,286,-715,1287,-1716, 1716,-1287, 715, -286,78,-13,1},{0,4096,16777216,2176782336, 68719476736, 1000000000000, 8916100448256,56693912375296, 281474976710656, 1156831381426176, 4096000000000000, 12855002631049216, 36520347436056576}, 20] (* _Harvey P. Dale_, Apr 05 2018 *)
%o (Magma) [(2*n)^12: n in [0..20]]; // _Vincenzo Librandi_, Sep 05 2011
%o (PARI) vector(30, n, n--; (2*n)^12) \\ _G. C. Greubel_, Sep 15 2018
%Y Cf. A016764.
%K nonn,easy
%O 0,2
%A _N. J. A. Sloane_
|
