cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-10 of 16 results. Next

A001044 a(n) = (n!)^2.

Original entry on oeis.org

1, 1, 4, 36, 576, 14400, 518400, 25401600, 1625702400, 131681894400, 13168189440000, 1593350922240000, 229442532802560000, 38775788043632640000, 7600054456551997440000, 1710012252724199424000000, 437763136697395052544000000, 126513546505547170185216000000
Offset: 0

Views

Author

Keywords

Comments

Let M_n be the symmetrical n X n matrix M_n(i,j) = 1/Max(i,j); then for n > 0 det(M_n)=1/a(n). - Benoit Cloitre, Apr 27 2002
The n-th entry of the sequence is the value of the permanent of a k X k matrix A defined as follows: k is the n-th odd number; if we concatenate the rows of A to form a vector v of length n^2, v_{i}=1 if i=1 or a multiple of 2. - Simone Severini, Feb 15 2006
a(n) = number of set partitions of {1,2,...,3n-1,3n} into blocks of size 3 in which the entries of each block mod 3 are distinct. For example, a(2) = 4 counts 123-456, 156-234, 126-345, 135-246. - David Callan, Mar 30 2007
From Emeric Deutsch, Nov 22 2007: (Start)
Number of permutations of {1,2,...,2n} with no even entry followed by a smaller entry. Example: a(2)=4 because we have 1234, 1324, 3124 and 2314.
Number of permutations of {1,2,...,2n} with n even entries that are followed by a smaller entry. Example: a(2)=4 because we have 2143, 3421, 4213 and 4321.
Number of permutations of {1,2,...,2n-1} with no even entry followed by a smaller entry. Example: a(2)=4 because we have 123, 132, 312 and 231.
Number of permutations of {1,2,...,2n-1} with n-1 odd entries followed by a smaller entry. Example: a(2)=4 because we have 132, 312, 231 and 321.
(End)
G. Leibniz in his "Ars Combinatoria" established the identity P(n)^2 = P(n-1)[P(n+1)-P(n)], where P(n) = n!. (For example, see the Burton reference.) - Mohammad K. Azarian, Mar 28 2008
a(n) is also the determinant of the symmetric n X n matrix M defined by M(i,j) = sigma_2(gcd(i,j)) for 1 <= i,j <= n, and n>0, where sigma_2 is A001157. - Enrique Pérez Herrero, Aug 13 2011
The o.g.f. of 1/a(n) is BesselI(0,2*sqrt(x)). See Abramowitz-Stegun (reference and link under A008277), p. 375, 9.6.10. - Wolfdieter Lang, Jan 09 2012
Number of n x n x n cubes C of zeros and ones such that C(x,y,z) and C(u,v,w) can be nonzero simultaneously only if either x!=u, y!=v, or z!=w. This generalizes permutations which can be considered as n x n squares P of zeros and ones such that P(x,y) and P(u,v) can be nonzero simultaneously only if either x!=u or y!=v. - Joerg Arndt, May 28 2012
a(n) is the number of functions f:[n]->[n(n+1)/2] such that, if round(sqrt(2f(x))) = round(sqrt(2f(y))), then x=y. - Dennis P. Walsh, Nov 26 2012
From Jerrold Grossman, Jul 22 2018: (Start)
a(n) is the number of n X n 0-1 matrices whose row sums and column sums are both {1,2,...,n}.
a(n) is the number of linear arrangements of 2n blocks of n different colors, 2 of each color, such that there are an even number of blocks between each pair of blocks of the same color.
(End)
Number of ways to place n instances of a digit inside an n X n X n cube so that no two instances lie on a plane parallel to a face of the cube (see Khovanova link, Lemma 6, p. 22). - Tanya Khovanova and Wayne Zhao, Oct 17 2018
Number of permutations P of length 2n which maximize Sum_{i=1..2n} |P_i - i|. - Fang Lixing, Dec 07 2018

Examples

			Consider the square array
  1,  2,  3,  4,  5,  6, ...
  2,  4,  6,  8, 10, 12, ...
  3,  6,  9, 12, 15, 18, ...
  4,  8, 12, 16, 20, 24, ...
  5, 10, 15, 20, 25, 30, ...
  ...
then a(n) = product of n-th antidiagonal. - _Amarnath Murthy_, Apr 06 2003
a(3) = 36 since there are 36 functions f:[3]->[6] such that, if round(sqrt(2f(x))) = round(sqrt(2f(y))), then x=y. The functions, denoted by <f(1),f(2),f(3)>, are <1,2,4>, <1,2,5>, <1,2,6>, <1,3,4>, <1,3,5>, <1,3,6> and their respective permutations. - _Dennis P. Walsh_, Nov 26 2012
1 + x + 4*x^2 + 36*x^3 + 576*x^4 + 14400*x^5 + 518400*x^6 + ...
		

References

  • Archimedeans Problems Drive, Eureka, 22 (1959), 15.
  • David Burton, "The History of Mathematics", Sixth Edition, Problem 2, p. 433.
  • J. Dezert, editor, Smarandacheials, Mathematics Magazine, Aurora, Canada, No. 4/2004 (to appear).
  • S. M. Kerawala, The enumeration of the Latin rectangle of depth three by means of a difference equation, Bull. Calcutta Math. Soc., 33 (1941), 119-127.
  • J. Riordan, Combinatorial Identities, Wiley, 1968, p. 217.
  • N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
  • F. Smarandache, Back and Forth Factorials, Arizona State Univ., Special Collections, 1972.
  • R. P. Stanley, Enumerative Combinatorics, Cambridge, Vol. 2, 1999; see Problem 5.62(b).

Crossrefs

First right-hand column of triangle A008955.
Row n=2 of A225816.
Cf. A000290.
With signs, a row of A288580.

Programs

  • GAP
    List([0..20],n->Factorial(n)^2); # Muniru A Asiru, Oct 24 2018
    
  • Haskell
    import Data.List (genericIndex)
    a001044 n = genericIndex a001044_list n
    a001044_list = 1 : zipWith (*) (tail a000290_list) a001044_list
    -- Reinhard Zumkeller, Sep 05 2015
    
  • Magma
    [Factorial(n)^2: n in [0..20]]; // Vincenzo Librandi, Oct 24 2018
    
  • Maple
    seq((n!)^2,n=0..20); # Dennis P. Walsh, Nov 26 2012
  • Mathematica
    Table[n!^2, {n, 0, 20}] (* Stefan Steinerberger, Apr 07 2006 *)
    Join[{1},Table[Det[DiagonalMatrix[Range[n]^2]],{n,20}]] (* Harvey P. Dale, Mar 31 2020 *)
  • PARI
    a(n)=n!^2 \\ Charles R Greathouse IV, Jun 15 2011
    
  • Python
    import math
    for n in range(0,20): print(math.factorial(n)**2, end=', ') # Stefano Spezia, Oct 29 2018

Formula

a(n) = Integral_{x>=0} 2*BesselK(0, 2*sqrt(x))*x^n. This integral represents the n-th moment of a positive function defined on the positive half-axis. - Karol A. Penson, Oct 09 2001
a(n) ~ 2*Pi*n*e^(-2*n)*n^(2*n). - Joe Keane (jgk(AT)jgk.org), Jun 07 2002
a(n) = polygorial(n, 4) = A000142(n)/A000079(n)*A000165(n) = (n!/2^n)*Product_{i=0..n-1} (2*i + 2) = n!*Pochhammer(1, n) = n!^2. - Daniel Dockery (peritus(AT)gmail.com), Jun 13 2003
a(n) = Sum_{k>=0} (-1)^k*C(n, k)^2*k!*(2*n-k)!. - Philippe Deléham, Jan 07 2004
a(n) = !n!1 = !n! = Product{i=0, 1, 2, ... .}_{0 < |n-i| <= n}(n-i) = n(n-1)(n-2)...(2)(1)(-1)(-2)...(-n+2)(-n+1)(-n) = [(-1)^n][(n!)^2]. - J. Dezert (Jean.Dezert(AT)onera.fr), Mar 21 2004
D-finite with recurrence: a(0) = 1, a(n) = n^2*a(n-1). - Arkadiusz Wesolowski, Oct 04 2011
From Sergei N. Gladkovskii, Jun 14 2012: (Start)
A(x) = Sum_{n>=0,N) a(n)*x^n = 1 + x/(U(0;N-2)-x); N >= 4; U(k)= 1 + x*(k+1)^2 - x*(k+2)^2/G(k+1); besides U(0;infinity)=x; (continued fraction).
Let B(x) = Sum_{n>=0} a(n)*x^n/((n!)*(n+s)!), then B(0) = 1/(1-x) for abs(x) < 1 and B(1)= -1/x * log(1-x) for abs(x)< 1.
(End).
G.f.: 1 + x*(G(0) - 1)/(x-1) where G(k) = 1 - (k+1)^2*(1 - x*G(k+1)). - Sergei N. Gladkovskii, Jan 15 2013
a(n) = det(S(i+2,j), 1 <= i,j <= n), where S(n,k) are Stirling numbers of the second kind. - Mircea Merca, Apr 04 2013
a(n) = (2*n+1)!*2^(-4*n)*Sum_{k=0..n} (-1)^k*C(2*n+1,n-k)/(2*k+1). - Mircea Merca, Nov 12 2013
a(n) = A000290(A000142(n)). - Michel Marcus, Nov 12 2013
Sum_{n>=0} 1/a(n) = A070910 [Gradsteyn, Rzyhik 0.246.1]. - R. J. Mathar, Feb 25 2014. Corrected by Ilya Gutkovskiy, Aug 16 2016
From Ivan N. Ianakiev, Aug 16 2016: (Start)
a(n) = a(n-1) + 2*((n-1)^2)*sqrt(a(n-1)*a(n-2)) + ((n-1)^4)*a(n-2), for n > 1.
a(n) = a(n-1) - 2*(n^2 - 1)*sqrt(a(n-1)*a(n-2)) + (n^2 - 1)*a(n-2), for n > 1.
(End).
From Ilya Gutkovskiy, Aug 16 2016: (Start)
a(n) = A184877(n)*A184877(n-1).
Sum_{n>=0} (-1)^n/a(n) = BesselJ(0,2) = A091681. (End)
Sum_{n>=0} a(n)/(2*n+1)! = 2*Pi/sqrt(27). - Daniel Suteu, Feb 06 2017
a(n) = [x^n] Product_{k=1..n} (1 + k^2*x). - Vaclav Kotesovec, Feb 19 2022
a(n) = (2*n+1)! * [x^(2*n+1)] 4*arcsin(x/2)/sqrt(4-x^2). - Ira M. Gessel, Dec 10 2024

Extensions

More terms from James Sellers, Sep 19 2000
More terms from Simone Severini, Feb 15 2006

A134367 a(n) = (n!)^(n-2).

Original entry on oeis.org

1, 1, 1, 6, 576, 1728000, 268738560000, 3252016064102400000, 4296582355504620109824000000, 828592942960967278432052230225920000000, 30067980714167580599742311330438184960000000000000000
Offset: 0

Views

Author

Artur Jasinski, Oct 22 2007

Keywords

Crossrefs

Programs

  • Mathematica
    Table[(n!)^(n - 2), {n, 0, 10}]

Formula

a(n) ~ exp(1/12 + 2*n - n^2) * n^(n^2 - 3*n/2 - 1) * (2*Pi)^(n/2 - 1). - Vaclav Kotesovec, Oct 26 2017

A134374 a(n) = ((2n+1)!)^2.

Original entry on oeis.org

1, 36, 14400, 25401600, 131681894400, 1593350922240000, 38775788043632640000, 1710012252724199424000000, 126513546505547170185216000000, 14797530453474819213543604224000000
Offset: 0

Views

Author

Artur Jasinski, Oct 22 2007

Keywords

Crossrefs

Programs

Formula

a(n) = A009445(n)^2 = A001044(2n+1). - Wesley Ivan Hurt, May 02 2014
From Amiram Eldar, Nov 16 2020: (Start)
Sum_{n>=0} 1/a(n) = A334378.
Sum_{n>=0} (-1)^n/a(n) = Im(BesselJ(0, 2*exp(3*Pi*i/4))). (End)

A134368 a(n) = ((2n)!)^(n+1).

Original entry on oeis.org

1, 4, 13824, 268738560000, 106562062388507443200000, 2283380023591730815784976384000000000000, 5785737804304645733190746102656048717392091545600000000000000
Offset: 0

Views

Author

Artur Jasinski, Oct 22 2007

Keywords

Crossrefs

Programs

  • Mathematica
    Table[((2n)!)^(n + 1), {n, 0, 10}]

Formula

a(n) ~ 2^((n+1)*(2*n+1)) * exp(1/24 - 2*n*(n+1)) * n^((n+1)*(4*n+1)/2) * Pi^((n+1)/2). - Vaclav Kotesovec, Oct 26 2017

A134366 a(n) = (n!)^(n-1).

Original entry on oeis.org

1, 1, 2, 36, 13824, 207360000, 193491763200000, 16390160963076096000000, 173238200573946282828103680000000, 300679807141675805997423113304381849600000000
Offset: 0

Views

Author

Artur Jasinski, Oct 22 2007

Keywords

Crossrefs

Programs

  • Maple
    a:=n->mul(n!/k, k=1..n): seq(a(n), n=0..9); # Zerinvary Lajos, Jan 22 2008
    restart:with (combinat):a:=n->mul(stirling1(n,1), j=3..n): seq(a(n), n=1..10); # Zerinvary Lajos, Jan 01 2009
  • Mathematica
    Table[(n!)^(n - 1), {n, 0, 10}]
  • PARI
    a(n) = (n!)^(n-1); \\ Michel Marcus, Dec 23 2015

Formula

a(n) ~ exp(1/12 + n - n^2) * n^((n-1)*(2*n+1)/2) * (2*Pi)^((n-1)/2). - Vaclav Kotesovec, Oct 26 2017

Extensions

Offset corrected to 0 by Michel Marcus, Dec 23 2015

A134369 a(n) = ((2n+1)!)^(n+1).

Original entry on oeis.org

1, 36, 1728000, 645241282560000, 6292383221978976013516800000, 4045146997974190235742848547815424000000000000, 363046466970952735968096996065196818096105852014637875200000000000000
Offset: 0

Views

Author

Artur Jasinski, Oct 22 2007

Keywords

Crossrefs

Programs

  • Mathematica
    Table[((2n+1)!)^(n + 1), {n, 0, 10}]

Formula

a(n) ~ 2^(2*(n+1)^2) * exp(13/24 - 2*n*(n+1)) * n^((n+1)*(4*n+3)/2) * Pi^((n+1)/2). - Vaclav Kotesovec, Oct 26 2017

A134371 a(n) = ((2n)!)^n.

Original entry on oeis.org

1, 2, 576, 373248000, 2642908293365760000, 629238322197897601351680000000000, 12078744213598964456884373878200091017216000000000000
Offset: 0

Views

Author

Artur Jasinski, Oct 22 2007

Keywords

Crossrefs

Programs

  • Mathematica
    Table[((2n)!)^(n), {n, 0, 10}]

Formula

a(n) ~ 2^(n*(2*n+1)) * exp(1/24 - 2*n^2) * n^(n*(4*n+1)/2) * Pi^(n/2). - Vaclav Kotesovec, Oct 26 2017

A225816 Square array A(n,k) = (k!)^n, n>=0, k>=0, read by antidiagonals.

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 6, 4, 1, 1, 1, 24, 36, 8, 1, 1, 1, 120, 576, 216, 16, 1, 1, 1, 720, 14400, 13824, 1296, 32, 1, 1, 1, 5040, 518400, 1728000, 331776, 7776, 64, 1, 1, 1, 40320, 25401600, 373248000, 207360000, 7962624, 46656, 128, 1, 1
Offset: 0

Views

Author

Alois P. Heinz, Jul 29 2013

Keywords

Comments

A(n,k) is the determinant of the k X k matrix M = [Stirling2(n+i,j)] for 1<=i,j<=k. A(2,3) = det([1,3,1; 1,7,6; 1,15,25]) = 36.
A(n,k) is the determinant of the symmetric k X k matrix M = [sigma_n(gcd(i,j))] for 1<=i,j<=k. A(2,3) = det([1,1,1; 1,5,1; 1,1,10]) = 36.
A(n,k) is (-1)^(n*k) times the determinant of the n X n matrix M = [Stirling1(k+i,j)] for 1<=i,j<=n. A(2,3) = (-1)^(2+3) * det([-6,11; 24,-50]) = 36.
A(n,k) is the number of lattice paths from {n}^k to {0}^k using steps that decrement one component by 1 such that for each point (p_1,p_2,...,p_k) we have abs(p_i-p_j) <= 1 for 1<=i,j<=k. A(2,3) = 36:
(1,2,2)-(1,1,2) (0,1,1)-(0,0,1)
/ X \ / X \
(2,2,2)-(2,1,2) (1,2,1)-(1,1,1)-(1,0,1) (0,1,0)-(0,0,0).
\ X / \ X /
(2,2,1) (2,1,1) (1,1,0) (1,0,0)
A(n,k) is the number of set partitions of [k*(n+1)] into k blocks of size n+1 such that the elements of each block are distinct mod n+1. A(2,3) = 36: 123|456|789, 126|345|789, ..., 189|234|567, 189|246|357.

Examples

			Square array A(n,k) begins:
  1, 1,  1,    1,       1,           1, ...
  1, 1,  2,    6,      24,         120, ...
  1, 1,  4,   36,     576,       14400, ...
  1, 1,  8,  216,   13824,     1728000, ...
  1, 1, 16, 1296,  331776,   207360000, ...
  1, 1, 32, 7776, 7962624, 24883200000, ...
		

Crossrefs

Columns k=0+1, 2-4 give: A000012, A000079, A000400, A009968.
Rows n=0-4 give: A000012, A000142, A001044, A000442, A134375.
Main diagonal gives: A036740.

Programs

  • Maple
    A:= (n, k)-> k!^n:
    seq(seq(A(n,d-n), n=0..d), d=0..12);

Formula

A(n,k) = (k!)^n.
A(n,k) = k^n * A(n,k-1) for k>0, A(n,0) = 1.
A(n,k) = k! * A(n-1,k) for n>0, A(0,k) = 1.
G.f. of column k: 1/(1-k!*x).

A161736 Denominators of the column sums of the BG2 matrix.

Original entry on oeis.org

1, 9, 75, 1225, 19845, 160083, 1288287, 41409225, 1329696225, 10667118605, 85530896451, 1371086188563, 21972535073125, 176021737014375, 1409850293610375, 90324408810638025, 5786075364399106425, 46326420401234675625, 370882277949065911875, 5938020471163465810125
Offset: 2

Views

Author

Johannes W. Meijer, Jun 18 2009

Keywords

Comments

The BG2 matrix coefficients, see also A008956, are defined by BG2[2m,1] = 2*beta(2m+1) and the recurrence relation BG2[2m,n] = BG2[2m,n-1] - BG2[2m-2,n-1]/(2*n-3)^2 for m = -2, -1, 0, 1, 2, .. and n = 2, 3, .. , with beta(m) = sum((-1)^k/(1+2*k)^m, k=0..infinity). We observe that beta(2m+1) = 0 for m = -1, -2, -3, .. .
A different way to define the matrix coefficients is BG2[2*m,n] = (1/m)*sum(LAMBDA(2*m-2*k,n-1)*BG2[2*k,n], k=0..m-1) with LAMBDA(2*m,n-1) = (1-2^(-2*m))*zeta(2*m)-sum((2*k-1)^(-2*m), k=1..n-1) and BG2[0,n] = Pi/2 for m = 0, 1, 2, .. , and n = 1, 2, 3 .. , with zeta(m) the Riemann zeta function.
The columns sums of the BG2 matrix are defined by sb(n) = sum(BG2[2*m,n], m=0..infinity) for n = 2, 3, .. . For large values of n the value of sb(n) approaches Pi/2.
It is remarkable that if we assume that BG2[2m,1] = 2 for m = 0, 1, .. the columns sums of the modified matrix converge to the original sb(n) values. The first Maple program makes use of this phenomenon and links the sb(n) with the central factorial numbers A008956.
The column sums sb(n) can be linked to other sequences, see the second Maple program.
We observe that the column sums sb(n) of the BG2(n) matrix are related to the column sums sl(n) of the LG2(n) matrix, see A008956, by sb(n) = (-1)^(n+1)*(2*n-1)*sl(n).
a(n+2), for n >= 0, seems to coincide with the numerators belonging to A278145. - Wolfdieter Lang, Nov 16 2016
Suppose that, given values f(x-2*n+1), f(x-2*n+3), ..., f(x-1), f(x+1), ..., f(x+2*n-3), f(x+2*n-1), we approximate f(x) using the first 2*n terms of its Taylor series. Then 1/sb(n+1) is the coefficient of f(x-1) and f(x+1). - Matthew House, Dec 03 2024

Examples

			sb(2) = 2; sb(3) = 16/9; sb(4) = 128/75; sb(5) = 2048/1225; etc..
		

Crossrefs

Programs

  • Magma
    [Denominator((2^(4*n-5)*(Factorial(n-1))^4)/((n-1)*(Factorial(2*n-2))^2)): n in [2..20]]; // G. C. Greubel, Sep 26 2018
  • Maple
    nmax := 18; for n from 0 to nmax do A001818(n) := (doublefactorial(2*n-1))^2 od: for n from 0 to nmax do A008956(n, 0):=1 od: for n from 0 to nmax do A008956(n, n) := A001818(n) od: for n from 1 to nmax do for m from 1 to n-1 do A008956(n, m) := (2*n-1)^2*A008956(n-1, m-1) + A008956(n-1, m) od: od: for n from 1 to nmax do for m from 0 to n do s(n, m):=0; s(n, m) := s(n, m)+ sum((-1)^k1*A008956(n, n-k1), k1=0..n-m): od: sb1(n+1) := sum(s(n, k1), k1=1..n) * 2/A001818(n); od: seq(sb1(n), n=2..nmax); # End program 1
    nmax1 := nmax; for n from 0 to nmax1 do A001147(n):= doublefactorial(2*n-1) od: for n from 0 to nmax1/2 do A133221(2*n+1) := A001147(n); A133221(2*n) := A001147(n) od: for n from 0 to nmax1 do A002474(n) := 2^(2*n+1)*n!*(n+1)! od: for n from 1 to nmax1 do A161738(n) := ((product((2*n-3-2*k1), k1=0..floor(n/2-1)))) od: for n from 2 to nmax1 do sb2(n) := A002474(n-2) / (A161738(n)*A133221(n-1))^2 od: seq(sb2(n), n=2..nmax1); # End program 2
    # Above Maple programs edited by Johannes W. Meijer, Sep 25 2012
    r := n -> (1/Pi)*(2*n - 2)*((n - 3/2)!/(n - 1)!)^2: a := n -> numer(simplify(r(n))):
    seq(a(n), n = 1..21);  # Peter Luschny, Feb 12 2025
  • Mathematica
    sb[2]=2; sb[n_] := sb[n] = sb[n-1]*4*(n-1)*(n-2)/(2n-3)^2; Table[sb[n] // Denominator, {n, 2, 20}] (* Jean-François Alcover, Aug 14 2017 *)
  • PARI
    {a(n) = if( n<2, 0, n--; numerator( binomial( 2*n, n)^2 * n / 2^(n+1) ))}; /* Michael Somos, May 09 2011 */
    

Formula

a(n) = denom(sb(n)) with sb(n) = (2^(4*n-5)*(n-1)!^4)/((n-1)*(2*n-2)!^2) and A161737(n) = numer(sb(n)).
a(n+1) = numerator of C(2*n,n)^2 * n / 2^(n+1). - Michael Somos, May 09 2011
a(n) = A001902(2*n-3). - Mats Granvik, Nov 25 2018
a(n) = numerator((1/Pi)*(2*n - 2)*((n - 3/2)!/(n - 1)!)^2). - Peter Luschny, Feb 13 2025

A134372 a(n) = ((2n)!)^2.

Original entry on oeis.org

1, 4, 576, 518400, 1625702400, 13168189440000, 229442532802560000, 7600054456551997440000, 437763136697395052544000000, 40990389067797283140009984000000, 5919012181389927685417441689600000000
Offset: 0

Views

Author

Artur Jasinski, Oct 22 2007

Keywords

Crossrefs

Programs

  • Mathematica
    Table[((2n)!)^(2), {n, 0, 10}]
    ((2*Range[0,20])!)^2 (* Harvey P. Dale, Jul 14 2011 *)
  • PARI
    a(n) = ((2*n)!)^2; \\ Michel Marcus, Nov 16 2020

Formula

From Amiram Eldar, Nov 16 2020: (Start)
Sum_{n>=0} 1/a(n) = A334379.
Sum_{n>=0} (-1)^n/a(n) = A334632. (End)
Showing 1-10 of 16 results. Next