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 A201282 #11 Jan 30 2025 15:46:06 %S A201282 3,1,2,2,7,6,3,6,0,7,5,4,1,1,1,1,3,5,8,0,6,8,5,7,0,0,2,1,3,0,5,8,3,4, %T A201282 2,6,6,5,2,1,2,7,9,2,9,9,9,9,8,9,3,1,0,0,0,6,2,0,5,4,0,3,2,0,7,8,4,8, %U A201282 6,7,3,5,6,4,0,4,3,3,2,9,1,4,4,8,7,1,6,8,9,0,2,6,8,7,8,4,6,2,4 %N A201282 Decimal expansion of x satisfying x^2 + 3 = cot(x) and 0 < x < Pi. %C A201282 See A201280 for a guide to related sequences. The Mathematica program includes a graph. %H A201282 <a href="/index/Tra#transcendental">Index entries for transcendental numbers</a>. %e A201282 0.3122763607541111358068570021305834266... %t A201282 a = 1; c = 3; %t A201282 f[x_] := a*x^2 + c; g[x_] := Cot[x] %t A201282 Plot[{f[x], g[x]}, {x, 0, Pi/2}, {AxesOrigin -> {0, 0}}] %t A201282 r = x /. FindRoot[f[x] == g[x], {x, .31, .32}, WorkingPrecision -> 110] %t A201282 RealDigits[r] (* A201282 *) %Y A201282 Cf. A201280. %K A201282 nonn,cons %O A201282 0,1 %A A201282 _Clark Kimberling_, Nov 29 2011