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 A198580 #9 Apr 23 2025 12:48:30
%S A198580 1,7,1,7,3,6,3,2,4,5,1,5,0,8,9,5,4,2,9,4,6,3,7,2,2,9,9,5,4,5,1,4,2,4,
%T A198580 3,0,0,2,1,2,3,3,3,5,0,7,9,9,5,0,6,1,3,5,2,6,0,8,6,6,1,2,1,0,6,8,9,6,
%U A198580 2,0,4,8,5,3,3,0,3,9,7,0,2,1,4,7,8,9,5,6,5,6,8,6,8,2,2,8,5,6,8
%N A198580 Decimal expansion of x>0 satisfying 3*x^2-4x=2*sin(x).
%C A198580 See A198414 for a guide to related sequences. The Mathematica program includes a graph.
%H A198580 <a href="/index/Tra#transcendental">Index entries for transcendental numbers</a>.
%e A198580 1.71736324515089542946372299545142430021233350...
%t A198580 a = 3; b = -4; c = 2;
%t A198580 f[x_] := a*x^2 + b*x; g[x_] := c*Sin[x]
%t A198580 Plot[{f[x], g[x]}, {x, -.2, 2}]
%t A198580 r = x /. FindRoot[f[x] == g[x], {x, 1.7, 1.8}, WorkingPrecision -> 110]
%t A198580 RealDigits[r] (* A198580 *)
%Y A198580 Cf. A198414.
%K A198580 nonn,cons
%O A198580 1,2
%A A198580 _Clark Kimberling_, Oct 27 2011