cp's OEIS Frontend

A364197 a(n+1) = a(|n-a(n)^2|) + 1, a(0) = 0.

%I A364197 #30 Aug 18 2023 23:51:10
%S A364197 0,1,1,2,2,1,3,3,2,3,1,4,2,3,3,2,5,4,2,4,3,5,3,4,4,3,6,2,5,3,4,4,3,5,
%T A364197 3,4,5,5,3,4,5,3,4,7,4,6,4,5,4,4,6,4,5,3,5,4,5,5,4,5,4,5,6,7,4,5,6,5,
%U A364197 5,8,2,7,4,6,6,4,6,6,4,7,5,5,6,5,5,6,5,6,5,8,4,7,5,6,6,5,3,7,5,7
%N A364197 a(n+1) = a(|n-a(n)^2|) + 1, a(0) = 0.
%H A364197 Michael De Vlieger, <a href="/A364197/b364197.txt">Table of n, a(n) for n = 0..10000</a>
%H A364197 Rok Cestnik, <a href="/A364197/a364197.pdf">Term-referencing tree for 1000 terms</a>.
%F A364197 a(n) ~ (3n)^(1/3)  (conjectured).
%e A364197 a(1) = a(|0-a(0)^2|)+1 = a(|0-0|)+1 = a(0)+1 = 1.
%e A364197 a(2) = a(|1-a(1)^2|)+1 = a(|1-1|)+1 = a(0)+1 = 1.
%e A364197 a(3) = a(|2-a(2)^2|)+1 = a(|2-1|)+1 = a(1)+1 = 2.
%e A364197 a(4) = a(|3-a(3)^2|)+1 = a(|3-4|)+1 = a(1)+1 = 2.
%e A364197 a(5) = a(|4-a(4)^2|)+1 = a(|4-4|)+1 = a(0)+1 = 1.
%t A364197 a[0] = 0; a[n_] := a[n] = a[Abs[n - 1 - a[n - 1]^2]] + 1; Array[a, 100, 0] (* _Amiram Eldar_, Jul 13 2023 *)
%o A364197 (Python)
%o A364197 a = [0]; [a.append(a[abs(n-a[n]**2)]+1) for n in range(100)]
%Y A364197 Cf. A364198 (indices of record highs).
%Y A364197 Cf. A339929, A340224.
%Y A364197 Cf. A281130, A330772, A340134, A002516, A003056, A004001, A005185.
%K A364197 nonn
%O A364197 0,4
%A A364197 _Rok Cestnik_, Jul 13 2023