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 A189037 #12 Feb 14 2025 02:05:02 %S A189037 6,0,9,6,1,1,7,9,6,7,9,7,7,9,2,4,3,1,2,7,2,3,2,3,7,6,8,0,0,3,2,4,0,3, %T A189037 7,1,8,5,6,6,0,0,0,9,6,8,2,8,2,9,7,4,4,5,7,0,0,1,7,0,8,0,3,3,6,3,1,3, %U A189037 0,7,0,6,7,0,7,7,9,7,3,0,0,8,0,1,5,1,7,0,4,3,6,4,8,6,6,4,4,6,2,9,1,4,4,3,1,9,9,4,8,8,2,5,9,8,2,3,2,2,9,8,0,8,7,3,2,2,3,9,4,9 %N A189037 Decimal expansion of (9-sqrt(17))/8. %C A189037 Decimal expansion of the shape (= length/width = (9-sqrt(17))/8) of the lesser (9/4)-contraction rectangle. %C A189037 See A188738 for an introduction to lesser and greater r-contraction rectangles, their shapes, and partitioning these rectangles into a sets of squares in a manner that matches the continued fractions of their shapes. %e A189037 0.60961179679779243127232376800324037185660009... %t A189037 r = 9/4; t = (r - (-4 + r^2)^(1/2))/2; FullSimplify[t] %t A189037 N[t, 130] %t A189037 RealDigits[N[t, 130]][[1]] %t A189037 ContinuedFraction[t, 120] %t A189037 RealDigits[(9-Sqrt[17])/8,10,150][[1]] (* _Harvey P. Dale_, Jan 30 2019 *) %Y A189037 Cf. A188738. %K A189037 nonn,cons,easy %O A189037 0,1 %A A189037 _Clark Kimberling_, Apr 15 2011