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 A104910 #6 Jun 28 2021 02:48:06 %S A104910 0,0,16,35,37,91,175,214,316,401,590,713,1005,1313,1694,2224,2798, %T A104910 3635,4590,5858,7486,9591,12175,15548,19760,25238,32134,40885,52093, %U A104910 66222,84326,107306 %N A104910 a(n) = A104908(n) - 100*A104803(n). %H A104910 G. C. Greubel, <a href="/A104910/b104910.txt">Table of n, a(n) for n = 1..1000</a> %t A104910 A104803[n_]:= A104803[n]= If[n<3, (2*n-1), Floor[Sqrt[A104803[n-1]^2 +A104803[n- 2]^2]]]; %t A104910 A104908[n_]:= A104908[n]= If[n<3, 100*(2*n-1), Floor[Sqrt[A104908[n-1]^2 +A104908[n -2]^2]]]; %t A104910 A104910[n_]:= A104908[n] - 100*A104803[n]; %t A104910 Table[A104910[n], {n, 60}] (* _G. C. Greubel_, Jun 27 2021 *) %Y A104910 Cf. A104803, A104908, A104909. %K A104910 nonn %O A104910 1,3 %A A104910 _Zak Seidov_, Mar 29 2005