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 A053509 #20 Sep 08 2022 08:45:00
%S A053509 0,0,0,0,1,30,735,17920,459270,12600000,372027810,11824496640,
%T A053509 403786706895,14772648450560,577227041015625,24013333950627840,
%U A053509 1060372471758165020,49558656380297379840,2444960458495625410260,127008768000000000000000
%N A053509 a(n) = binomial(n-1,4)*n^(n-5).
%D A053509 R. P. Stanley, Enumerative Combinatorics, Cambridge, Vol. 2, 1999; see Prop. 5.3.2.
%H A053509 G. C. Greubel, <a href="/A053509/b053509.txt">Table of n, a(n) for n = 1..250</a>
%F A053509 E.g.f.: -LambertW(-x)^5/5!. - _Vladeta Jovovic_, Apr 07 2001
%t A053509 Table[Binomial[n-1,4]*n^(n-5), {n,1,25}] (* _G. C. Greubel_, Jan 18 2017 *)
%o A053509 (PARI) vector(25, n, binomial(n-1,4)*n^(n-5)) \\ _G. C. Greubel_, Jan 18 2017
%o A053509 (Magma) [Binomial(n-1,4)*n^(n-5): n in [1..30]]; // _G. C. Greubel_, Nov 14 2017
%o A053509 (Sage) [binomial(n-1,4)*n^(n-5) for n in (1..25)] # _G. C. Greubel_, May 15 2019
%o A053509 (GAP) List([1..25], n-> Binomial(n-1,4)*n^(n-5)) # _G. C. Greubel_, May 15 2019
%Y A053509 Cf. A000169, A053506, A053507, A053508.
%K A053509 nonn
%O A053509 1,6
%A A053509 _N. J. A. Sloane_, Jan 15 2000