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 A369701 #17 Jan 30 2024 06:24:54
%S A369701 0,1,54,6961,1233318,487047961,290742044714,347251334512896,
%T A369701 683674076661539256,2495297738110474036224,14634026423059969492022144,
%U A369701 156866160296614402006202168641,2612384850652790986902453089127552,74149419491027435547521058057290511849,3283295561194682488327071117265547706288707
%N A369701 AGM transform of the numbers of partitions (A000041) of the positive numbers.
%C A369701 See A368366 for the description of the AGM transform.
%H A369701 Paolo Xausa, <a href="/A369701/b369701.txt">Table of n, a(n) for n = 1..100</a>
%F A369701 a(n) = A026905(n)^n - A000312(n)*A058694(n).
%t A369701 A369701[n_] := With[{p = PartitionsP[Range[n]]}, Total[p]^n - n^n*Apply[Times, p]];
%t A369701 Array[A369701, 15]
%Y A369701 Cf. A368366.
%Y A369701 Cf. A000041, A000312, A026905, A058694.
%K A369701 nonn
%O A369701 1,3
%A A369701 _Paolo Xausa_, Jan 29 2024