cp's OEIS Frontend

A370223 AGM transform of the positive Fibonacci numbers.

%I A370223 #17 Feb 17 2024 21:07:52
%S A370223 0,0,10,865,155082,52802560,40048988817,71202718146816,
%T A370223 315615332953930528,3574469013941010577249,
%U A370223 104798469697184132865547168,7984603919946049180938300030976,1584983603576817306123611193840098529,820874582413458038007335015822715588591616
%N A370223 AGM transform of the positive Fibonacci numbers.
%C A370223 See A368366 for the description of the AGM transform.
%H A370223 Paolo Xausa, <a href="/A370223/b370223.txt">Table of n, a(n) for n = 1..68</a>
%F A370223 a(n) = A000071(n+2)^n - A000312(n)*A003266(n).
%t A370223 A370223[n_] := (Fibonacci[n+2]-1)^n - n^n*Fibonorial[n]; Array[A370223, 15]
%o A370223 (Python)
%o A370223 from itertools import count, islice
%o A370223 def A370223_gen(): # generator of terms
%o A370223     a, b, s, p = 1, 1, 0, 1
%o A370223     for n in count(1):
%o A370223         s += a
%o A370223         p *= a
%o A370223         yield s**n-n**n*p
%o A370223         a, b = b, a+b
%o A370223 A370223_list = list(islice(A370223_gen(),10)) # _Chai Wah Wu_, Feb 16 2024
%Y A370223 Cf. A368366.
%Y A370223 Cf. A000045, A000071, A000312, A003266.
%K A370223 nonn
%O A370223 1,3
%A A370223 _Paolo Xausa_, Feb 13 2024