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.

A368367 AGM transform of factorials.

This page as a plain text file.
%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