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 A077082 #13 Aug 22 2024 02:40:22
%S A077082 1,2,3,6,6,6,7,1044,1044,10,11,1044,1044,1044,1044,1044,1044,1044,
%T A077082 1044,20,21,22,23,1044,1044,1044,1044,1044,1044,1044,1044,1044,1044,
%U A077082 1044,1044,1044,1044,1044,1044,1044,1044,1044,1044,48,1044,46,47,48,1044
%N A077082 Largest value arising when phi(sigma(n)+phi(n))=A077080 is iterated with initial value of n.
%F A077082 a(n) = Max[FixedPointList[A077080, n]]. See program below. Seems convergent. [tested for initial values below 1024.]
%e A077082 n=225: results in iteration sequence of 44 terms: {225,522,444,...,471744,653312,570240}, largest is 653312=a(225).
%t A077082 f[x_] := EulerPhi[DivisorSigma[1, x]+EulerPhi[x]] Table[Max[FixedPointList[f, w]], {w, 1, 1024}]
%Y A077082 Cf. A000010, A000203, A065387, A077080-A077085.
%K A077082 nonn
%O A077082 1,2
%A A077082 _Labos Elemer_, Oct 28 2002