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 A094819 #15 Apr 19 2025 10:04:35 %S A094819 0,7,8,7,9,6,8,7,10,7,7,20,9,25,8,11,11,13,8,10,8,16,21,24,10,18,26, %T A094819 15,9,45,12,31,12,20,14,22,9,20,11,25,9,33,17,33,22,30,25,11,11,30,19, %U A094819 13,27,21,16,10,10,16,46,70,13,13,32,21,13,21,21,48,15,29,23,29,10,18,21 %N A094819 Number of steps needed for juggler sequence (A094683) started at 10^n to reach 1. %F A094819 a(n) = A007320(A011557(n)). - _Michel Marcus_, Apr 19 2025 %t A094819 fj[n_]:=If[EvenQ[n], Floor[Sqrt[n]], Floor[n^(3/2)]];a094819[n_]:=Length[ NestWhileList[fj,10^n, # != 1 &]] - 1;Array[a094819,75,0] (* _James C. McMahon_, Apr 18 2025 *) %Y A094819 Cf. A007320, A011557, A094683. %K A094819 nonn %O A094819 0,2 %A A094819 _Jason Earls_, Jun 12 2004