cp's OEIS Frontend

A333772 a(n) = n * 2^n * (n!)^2.

%I A333772 #24 Jun 01 2024 18:02:56
%S A333772 2,32,864,36864,2304000,199065600,22759833600,3329438515200,
%T A333772 606790169395200,134842259865600000,35895009576222720000,
%U A333772 11277559372311429120000,4129466323494701629440000,1743270091026070964797440000,840505222458998500884480000000
%N A333772 a(n) = n * 2^n * (n!)^2.
%C A333772 Sum_{n>=1} a(n) / (2*n)! = Pi + 3.
%H A333772 Simon Plouffe, <a href="https://arxiv.org/abs/0912.0303">On the computation of the n'th decimal digit of various transcendental numbers</a>, arXiv:0912.0303 [math.NT], 2009.
%e A333772 a(2) = 2 * 2^2 * ( 2! )^2 = 2 * 4 * 4 = 32.
%e A333772 a(3) = 3 * 2^3 * ( 3! )^2 = 3 * 8 * 36 = 864.
%e A333772 Sum_{n=1..10} a(n) / ( 2n )! = 3 + 3.01310...
%e A333772 Sum_{n=1..12} a(n) / ( 2n )! = 3 + 3.10046...
%e A333772 Sum_{n=1..18} a(n) / ( 2n )! = 3 + 3.14046...
%e A333772 Sum_{n=1..20} a(n) / ( 2n )! = 3 + 3.14126...
%e A333772 Sum_{n=1..23} a(n) / ( 2n )! = 3 + 3.14154...
%t A333772 Table[n*2^n*(n!)^2,{n,20}] (* _Harvey P. Dale_, Jun 01 2024 *)
%o A333772 (Rexx)
%o A333772 S = 2
%o A333772 do N = 2 while length( S ) < 255
%o A333772    S = S || ', ' || N * ( 2 ** N ) * ( !( N ) ** 2 )
%o A333772 end N
%o A333772 say S                         ;  return S
%Y A333772 Cf. A001044 ( (n!)^2 ), A010050 ( (2n)! ), A000796 (digits of Pi).
%K A333772 nonn
%O A333772 1,1
%A A333772 _Frank Ellermann_, Apr 05 2020