This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A199511 Decimal expansion of x>0 satisfying 3*x^2-3*x*sin(x)=cos(x). 2
 1, 0, 2, 3, 4, 0, 4, 6, 7, 4, 6, 7, 4, 9, 5, 2, 1, 1, 5, 8, 9, 1, 5, 0, 3, 3, 9, 8, 3, 4, 0, 4, 5, 2, 4, 6, 0, 8, 8, 2, 7, 7, 3, 1, 5, 4, 4, 1, 5, 9, 5, 1, 3, 7, 7, 4, 8, 6, 0, 7, 7, 7, 8, 3, 3, 0, 7, 7, 9, 5, 1, 1, 5, 8, 3, 2, 4, 1, 0, 2, 9, 4, 8, 1, 4, 0, 3, 8, 9, 3, 2, 6, 5, 2, 0, 5, 1, 2, 3 (list; constant; graph; refs; listen; history; text; internal format)
 OFFSET 1,3 COMMENTS See A199429 for a guide to related sequences.  The Mathematica program includes a graph. LINKS EXAMPLE x=1.02340467467495211589150339834045246088277315441... MATHEMATICA a = 3; b = -3; c = 1; f[x_] := a*x^2 + b*x*Sin[x]; g[x_] := c*Cos[x] Plot[{f[x], g[x]}, {x, -Pi, Pi}, {AxesOrigin -> {0, 0}}] r = x /. FindRoot[f[x] == g[x], {x, 1.02, 1.03}, WorkingPrecision -> 110] RealDigits[r]  (* A199511 *) CROSSREFS Cf. A199429. Sequence in context: A162593 A011025 A203571 * A049279 A126013 A119974 Adjacent sequences:  A199508 A199509 A199510 * A199512 A199513 A199514 KEYWORD nonn,cons AUTHOR Clark Kimberling, Nov 07 2011 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified June 19 16:47 EDT 2013. Contains 226415 sequences.