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 A369394 #16 Jan 31 2024 13:09:23 %S A369394 0,1,190,29761,9991618,3349024561,1787557230622,1073002497284641, %T A369394 913569251212186570,1211439486817121619201,1701996355944048723430570, %U A369394 3350440495714062711027347281,7769260076569386601943106748798,18992268581018658446853739996365841,54445901270324824915088660223022735282 %N A369394 AGM transform of the primes. %C A369394 See A368366 for the definition of the AGM transform. %H A369394 Paolo Xausa, <a href="/A369394/b369394.txt">Table of n, a(n) for n = 1..195</a> %t A369394 A369394[n_] := With[{p = Prime[Range[n]]}, Total[p]^n - n^n*Apply[Times, p]]; %t A369394 Array[A369394, 15] (* _Paolo Xausa_, Jan 29 2024 *) %o A369394 (PARI) a369394(n) = {my(v=primes(n)); vecsum(v)^n - n^n*vecprod(v)}; %o A369394 (Python) %o A369394 from sympy import prime, primorial %o A369394 def A369394(n): return sum(prime(i) for i in range(1,n+1))**n-n**n*primorial(n) # _Chai Wah Wu_, Jan 25 2024 %Y A369394 Cf. A368366. %K A369394 nonn,easy %O A369394 1,3 %A A369394 _Hugo Pfoertner_, Jan 24 2024