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 A181857 #29 Sep 08 2022 08:45:54
%S A181857 0,1,4,18,48,600,720,35280,40320,362880,3628800,439084800,479001600,
%T A181857 80951270400,87178291200,1307674368000,20922789888000,
%U A181857 6046686277632000,6402373705728000,2311256907767808000,2432902008176640000,51090942171709440000,1124000727777607680000
%N A181857 a(n) = lcm(n^2, n!).
%C A181857 If n > 4 then a(n) = n! for composite n and n * n! for prime n. - _David A. Corneth_, Aug 04 2015
%H A181857 Robert Israel, <a href="/A181857/b181857.txt">Table of n, a(n) for n = 0..411</a>
%F A181857 a(n) = lcm(A000290(n), A000142(n)).
%F A181857 a(n) = n! * A014973(n) for n >= 1. - _Johannes W. Meijer_, Jun 04 2016
%p A181857 A181857 := n -> ilcm(n^2, n!);
%t A181857 Table[LCM[n^2, n!], {n, 0, 17}] (* _Michael De Vlieger_, Aug 04 2015 *)
%o A181857 (PARI) a(n)=lcm(n!,n^2) \\ _Charles R Greathouse IV_, Feb 01 2013
%o A181857 (Magma) [Lcm(n^2, Factorial(n)): n in [0..30]]; // _Vincenzo Librandi_, Aug 07 2015
%Y A181857 Cf. A170826, A181860, A056040, A000290, A014973.
%K A181857 nonn
%O A181857 0,3
%A A181857 _Peter Luschny_, Nov 21 2010