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 A241974 #11 Jul 26 2025 08:02:54 %S A241974 1,2,3,4,30,6,42,8,9,30 %N A241974 a(n) is the limit of the sequence given by A241083^[i](n), where f^[i] means iterate f i times, or 0 if the sequence diverges. %C A241974 Either a(11) = 0 or a(11) > 10^(1310). %e A241974 a(5) = 30 because A241083(5) = 10, A241083(10) = 30, and A241083(30) = 30. %t A241974 a[n_] := FixedPoint[LCM[#, Floor[Sqrt[#]]] &, n]; Array[a, 10] (* _Amiram Eldar_, Jul 26 2025 *) %Y A241974 Cf. A241083, A179204. %K A241974 nonn,hard %O A241974 1,2 %A A241974 _J. Lowell_, May 03 2014