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 A368367 #26 Jan 31 2024 13:09:33 %S A368367 0,1,405,1112193,83733135993,442674314320893489, %T A368367 252729042985343953175786217,20874524971928676951126081870191637441, %U A368367 321062452616441231930929630956482460885924054669273,1152310647749051621143585533734466768135769634034830754169423308849 %N A368367 AGM transform of factorials. %C A368367 See A368366 for further information. %H A368367 Paolo Xausa, <a href="/A368367/b368367.txt">Table of n, a(n) for n = 1..30</a> %t A368367 A368367[n_] := With[{f = Range[n]!}, Total[f]^n - n^n*Apply[Times, f]]; %t A368367 Array[A368367, 10] (* _Paolo Xausa_, Jan 29 2024 *) %o A368367 (Python) %o A368367 from math import prod, factorial %o A368367 def A368367(n): return sum(factorial(i) for i in range(1,n+1))**n-n**n*prod(i**(n-i+1) for i in range(2,n+1)) # _Chai Wah Wu_, Jan 25 2024 %Y A368367 Cf. A000142, A368366. %K A368367 nonn %O A368367 1,3 %A A368367 _N. J. A. Sloane_, Jan 24 2024