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.
%I A180266 #21 Sep 22 2019 09:11:58
%S A180266 0,1,2,10,50,238,1092,4884,21450,92950,398684,1696396,7171892,
%T A180266 30161740,126293000,526864680,2191034970,9086921190,37596989100,
%U A180266 155232577500,639749274780,2632212288420,10814090022840,44369043365400
%N A180266 a(0) = 0; a(n) = C(2*n-2,n-1)*(n^2-2*n+2)/n for n >= 1.
%C A180266 We may define Figurate Numbers F(r,n,d) with rank r, index n in dimension d as F(r,n,d) = binomial(r+d-2,d-1) *((r-1)*(n-2)+d) /d. These are polygonal numbers A057145 or A086271 in d=2, pyramidal numbers A080851 in d=3, and 4D pyramidal numbers A080852 in d=4, for example.
%C A180266 This sequence here is a(n) = F(n,n,n), the n-th n-gonal figurate number in n dimensions.
%C A180266 Limit_{n -> infinity} a(n+1)/a(n) = 4. - _Robert G. Wilson v_, Oct 30 2013
%D A180266 Albert H. Beiler, Recreations in the Theory of Numbers, The Queen of Mathematics Entertains, Second Edition, Dover, New York, 1966, Chptr. XVIII Ball Games, p. 196.
%F A180266 a(n) = A000984(n-1) + (n-1)*A024483(n). [_R. J. Mathar_, Nov 18 2010]
%F A180266 From _Ilya Gutkovskiy_, Mar 29 2018: (Start)
%F A180266 O.g.f.: 1 - (1 - 7*x + 10*x^2)/(1 - 4*x)^(3/2).
%F A180266 E.g.f.: 1 - exp(2*x)*((1 - 3*x)*BesselI(0,2*x) + 2*x*BesselI(1,2*x)).
%F A180266 a(n) = [x^n] x*(1 - 3*x + n*x)/(1 - x)^(n+1). (End)
%t A180266 Figurate[ngon_, rank_, dim_] := Binomial[rank + dim - 2, dim - 1] ((rank - 1)*(ngon - 2) + dim)/dim; Table[ Figurate[n, n, n], {n, 50}]
%t A180266 Join[{0},Table[Binomial[2n-2,n-1] (n^2-2n+2)/n,{n,30}]] (* _Harvey P. Dale_, Sep 22 2019 *)
%Y A180266 Cf. A000984, A024483, A057145, A080851, A080852, A086271.
%K A180266 nonn
%O A180266 0,3
%A A180266 _Robert G. Wilson v_, Aug 22 2010