A198866 -id:A198866 - cp's OEIS frontend

A199061 Decimal expansion of x<0 satisfying 2*x^2+sin(x)=1.

9, 5, 2, 6, 0, 9, 7, 8, 3, 7, 1, 1, 3, 0, 6, 7, 1, 3, 7, 4, 7, 3, 4, 8, 0, 7, 3, 7, 9, 2, 3, 6, 0, 7, 0, 5, 8, 6, 4, 4, 5, 2, 8, 6, 2, 8, 1, 4, 1, 4, 5, 1, 1, 1, 7, 3, 6, 0, 8, 6, 8, 2, 8, 4, 8, 5, 0, 5, 0, 2, 3, 7, 8, 5, 1, 3, 9, 0, 0, 6, 4, 0, 3, 1, 9, 7, 1, 4, 1, 4, 7, 4, 1, 2, 1, 7, 9, 7, 1

Offset: 0

Clark Kimberling, Nov 02 2011

See A198866 for a guide to related sequences. The Mathematica program includes a graph.

			negative: -0.95260978371130671374734807379236070...
positive:  0.50711892841537397536307518244985199...

Index entries for transcendental numbers.

Cf. A198866.

a = 2; b = 1; c = 1;
f[x_] := a*x^2 + b*Sin[x]; g[x_] := c
Plot[{f[x], g[x]}, {x, -2, 2}, {AxesOrigin -> {0, 0}}]
r = x /. FindRoot[f[x] == g[x], {x, -.96, -.95}, WorkingPrecision -> 110]
RealDigits[r] (* A199061 *)
r = x /. FindRoot[f[x] == g[x], {x, .50, .51}, WorkingPrecision -> 110]
RealDigits[r] (* A199062 *)

A199062 Decimal expansion of x>0 satisfying 2*x^2+sin(x)=1.

Original entry on oeis.org

5, 0, 7, 1, 1, 8, 9, 2, 8, 4, 1, 5, 3, 7, 3, 9, 7, 5, 3, 6, 3, 0, 7, 5, 1, 8, 2, 4, 4, 9, 8, 5, 1, 9, 9, 6, 9, 5, 7, 7, 2, 8, 9, 7, 4, 6, 6, 5, 4, 0, 7, 7, 4, 1, 8, 0, 9, 1, 8, 0, 7, 7, 6, 2, 9, 8, 6, 6, 3, 4, 1, 0, 2, 9, 2, 3, 4, 4, 4, 5, 4, 6, 6, 7, 0, 1, 4, 6, 4, 7, 7, 4, 9, 8, 5, 9, 3, 1, 0

Offset: 0

Clark Kimberling, Nov 02 2011

See A198866 for a guide to related sequences. The Mathematica program includes a graph.

			negative: -0.9526097837113067137473480737923607058644...
positive:  0.507118928415373975363075182449851996957...

Index entries for transcendental numbers.

Cf. A198866.

a = 2; b = 1; c = 1;
f[x_] := a*x^2 + b*Sin[x]; g[x_] := c
Plot[{f[x], g[x]}, {x, -2, 2}, {AxesOrigin -> {0, 0}}]
r = x /. FindRoot[f[x] == g[x], {x, -.96, -.95}, WorkingPrecision -> 110]
RealDigits[r] (* A199061 *)
r = x /. FindRoot[f[x] == g[x], {x, .50, .51}, WorkingPrecision -> 110]
RealDigits[r] (* A199062 *)

A199063 Decimal expansion of x<0 satisfying 2*x^2+sin(x)=2.

Original entry on oeis.org

1, 2, 1, 1, 6, 5, 1, 2, 8, 2, 4, 3, 1, 5, 7, 7, 1, 2, 2, 6, 9, 0, 9, 7, 0, 1, 0, 8, 4, 4, 1, 9, 6, 8, 6, 5, 3, 8, 7, 2, 9, 2, 3, 0, 5, 2, 8, 3, 3, 6, 0, 1, 1, 1, 9, 8, 0, 8, 8, 1, 6, 3, 1, 1, 7, 1, 6, 8, 4, 2, 3, 2, 7, 9, 2, 2, 2, 0, 9, 0, 7, 0, 2, 1, 1, 1, 7, 4, 2, 1, 0, 3, 4, 5, 0, 7, 9, 1, 8

Offset: 1

Clark Kimberling, Nov 02 2011

See A198866 for a guide to related sequences. The Mathematica program includes a graph.

			negative: -1.21165128243157712269097010844196865387...
positive:  0.80067830457009112112413406604532756205...

Index entries for transcendental numbers.

Cf. A198866.

a = 2; b = 1; c = 2;
f[x_] := a*x^2 + b*Sin[x]; g[x_] := c
Plot[{f[x], g[x]}, {x, -2, 2}, {AxesOrigin -> {0, 0}}]
r = x /. FindRoot[f[x] == g[x], {x, -1.3, -1.2}, WorkingPrecision -> 110]
RealDigits[r](* A199063 *)
r = x /. FindRoot[f[x] == g[x], {x, .80, .81}, WorkingPrecision -> 110]
RealDigits[r](* A199064 *)

A199064 Decimal expansion of x>0 satisfying 2*x^2+sin(x)=2.

Original entry on oeis.org

8, 0, 0, 6, 7, 8, 3, 0, 4, 5, 7, 0, 0, 9, 1, 1, 2, 1, 1, 2, 4, 1, 3, 4, 0, 6, 6, 0, 4, 5, 3, 2, 7, 5, 6, 2, 0, 5, 7, 6, 8, 7, 6, 6, 4, 6, 2, 2, 7, 2, 4, 0, 5, 6, 9, 1, 3, 6, 4, 5, 5, 1, 9, 4, 5, 3, 5, 4, 4, 3, 9, 3, 1, 7, 5, 4, 2, 0, 8, 6, 9, 8, 6, 6, 3, 1, 8, 3, 9, 2, 7, 7, 9, 0, 2, 5, 5, 1, 5

Offset: 0

Clark Kimberling, Nov 02 2011

See A198866 for a guide to related sequences. The Mathematica program includes a graph.

			negative: -1.21165128243157712269097010844196865387...
positive:  0.80067830457009112112413406604532756205...

Index entries for transcendental numbers.

Cf. A198866.

a = 2; b = 1; c = 2;
f[x_] := a*x^2 + b*Sin[x]; g[x_] := c
Plot[{f[x], g[x]}, {x, -2, 2}, {AxesOrigin -> {0, 0}}]
r = x /. FindRoot[f[x] == g[x], {x, -1.3, -1.2}, WorkingPrecision -> 110]
RealDigits[r] (* A199063 *)
r = x /. FindRoot[f[x] == g[x], {x, .80, .81}, WorkingPrecision -> 110]
RealDigits[r] (* A199064 *)

A199065 Decimal expansion of x<0 satisfying 2*x^2+sin(x)=3.

Original entry on oeis.org

1, 4, 1, 1, 9, 8, 7, 3, 1, 0, 2, 3, 2, 3, 0, 3, 2, 8, 8, 8, 7, 3, 0, 6, 3, 5, 7, 9, 6, 8, 8, 4, 5, 9, 7, 9, 1, 6, 4, 0, 2, 1, 9, 8, 7, 2, 0, 9, 4, 7, 0, 1, 2, 4, 1, 0, 8, 9, 7, 4, 7, 3, 6, 7, 3, 7, 9, 8, 3, 5, 9, 8, 2, 5, 0, 1, 8, 7, 6, 8, 2, 6, 9, 6, 3, 4, 0, 7, 9, 8, 3, 5, 1, 1, 2, 1, 2, 3, 0

Offset: 1

Clark Kimberling, Nov 02 2011

See A198866 for a guide to related sequences. The Mathematica program includes a graph.

			negative: -1.41198731023230328887306357968845979164...
positive:  1.03450269177738273452176790088513105811...

Index entries for transcendental numbers.

Cf. A198866.

a = 2; b = 1; c = 3;
f[x_] := a*x^2 + b*Sin[x]; g[x_] := c
Plot[{f[x], g[x]}, {x, -2, 2}, {AxesOrigin -> {0, 0}}]
r = x /. FindRoot[f[x] == g[x], {x, -1.5, -1.4}, WorkingPrecision -> 110]
RealDigits[r] (* A199065 *)
r = x /. FindRoot[f[x] == g[x], {x, 1.03, 1.04}, WorkingPrecision -> 110]
RealDigits[r] (* A199066 *)

A199066 Decimal expansion of x>0 satisfying 2*x^2+sin(x)=3.

Original entry on oeis.org

1, 0, 3, 4, 5, 0, 2, 6, 9, 1, 7, 7, 7, 3, 8, 2, 7, 3, 4, 5, 2, 1, 7, 6, 7, 9, 0, 0, 8, 8, 5, 1, 3, 1, 0, 5, 8, 1, 1, 0, 1, 9, 0, 5, 2, 6, 6, 5, 5, 7, 0, 4, 4, 8, 7, 4, 1, 2, 7, 1, 1, 3, 0, 7, 8, 5, 5, 0, 2, 0, 5, 6, 4, 3, 9, 9, 6, 9, 8, 5, 2, 2, 9, 6, 7, 5, 3, 0, 1, 0, 6, 4, 9, 3, 9, 0, 8, 4, 4

Offset: 1

Clark Kimberling, Nov 02 2011

See A198866 for a guide to related sequences. The Mathematica program includes a graph.

			negative: -1.411987310232303288873063579688459791640...
positive:  1.03450269177738273452176790088513105811...

Index entries for transcendental numbers.

Cf. A198866.

a = 2; b = 1; c = 3;
f[x_] := a*x^2 + b*Sin[x]; g[x_] := c
Plot[{f[x], g[x]}, {x, -2, 2}, {AxesOrigin -> {0, 0}}]
r = x /. FindRoot[f[x] == g[x], {x, -1.5, -1.4}, WorkingPrecision -> 110]
RealDigits[r] (* A199065 *)
r = x /. FindRoot[f[x] == g[x], {x, 1.03, 1.04}, WorkingPrecision -> 110]
RealDigits[r] (* A199066 *)

A199067 Decimal expansion of x < 0 satisfying 2x^2+2sin(x) = 1.

Original entry on oeis.org

1, 1, 9, 6, 0, 8, 2, 0, 3, 3, 2, 9, 7, 1, 3, 4, 8, 1, 9, 1, 4, 5, 6, 2, 1, 9, 5, 2, 9, 4, 1, 0, 4, 3, 2, 1, 1, 5, 9, 7, 2, 0, 4, 7, 1, 5, 9, 5, 9, 6, 8, 3, 8, 0, 5, 1, 0, 2, 3, 8, 0, 7, 4, 0, 4, 9, 8, 1, 6, 1, 1, 3, 2, 3, 3, 5, 5, 1, 9, 8, 2, 1, 9, 3, 1, 4, 3, 5, 8, 7, 7, 9, 5, 7, 3, 7, 8, 6, 2, 5

Offset: 1

Clark Kimberling, Nov 02 2011

See A198866 for a guide to related sequences. The Mathematica program includes a graph.

			negative: -1.19608203329713481914562195294104321159720...
positive:  0.37088734011199207060142934573448899294899...

Index entries for transcendental numbers.

Cf. A198866.

a = 2; b = 2; c = 1;
f[x_] := a*x^2 + b*Sin[x]; g[x_] := c
Plot[{f[x], g[x]}, {x, -2, 2}, {AxesOrigin -> {0, 0}}]
r = x /. FindRoot[f[x] == g[x], {x, -1.2, -1.1}, WorkingPrecision -> 110]
RealDigits[r]  (* A199067 *)
r = x /. FindRoot[f[x] == g[x], {x, .37, .38}, WorkingPrecision -> 110]
RealDigits[r]  (* A199068 *)

a(92) onwards corrected by Georg Fischer, Aug 01 2021

A199068 Decimal expansion of x > 0 satisfying 2x^2+2sin(x) = 1.

Original entry on oeis.org

3, 7, 0, 8, 8, 7, 3, 4, 0, 1, 1, 1, 9, 9, 2, 0, 7, 0, 6, 0, 1, 4, 2, 9, 3, 4, 5, 7, 3, 4, 4, 8, 8, 9, 9, 2, 9, 4, 8, 9, 9, 8, 3, 1, 9, 9, 9, 7, 2, 7, 6, 9, 5, 6, 8, 7, 9, 0, 7, 1, 7, 0, 5, 0, 6, 9, 2, 0, 6, 6, 0, 3, 0, 4, 2, 1, 8, 8, 7, 2, 5, 9, 7, 7, 7, 2, 4, 6, 4, 4, 9, 4, 1, 0, 7, 7, 1, 4, 6

Offset: 0

Clark Kimberling, Nov 02 2011

See A198866 for a guide to related sequences. The Mathematica program includes a graph.

			negative: -1.19608203329713481914562195294104321159720...
positive:  0.37088734011199207060142934573448899294899...

Index entries for transcendental numbers.

Cf. A198866.

a = 2; b = 2; c = 1;
f[x_] := a*x^2 + b*Sin[x]; g[x_] := c
Plot[{f[x], g[x]}, {x, -2, 2}, {AxesOrigin -> {0, 0}}]
r = x /. FindRoot[f[x] == g[x], {x, -1.2, -1.1}, WorkingPrecision -> 110]
RealDigits[r]  (* A199067 *)
r = x /. FindRoot[f[x] == g[x], {x, .37, .38}, WorkingPrecision -> 110]
RealDigits[r]  (* A199068 *)

a(82) onwards corrected by Georg Fischer, Aug 01 2021

A199069 Decimal expansion of x<0 satisfying 2x^2+2sin(x)=3.

Original entry on oeis.org

1, 5, 8, 1, 1, 2, 1, 9, 7, 2, 2, 0, 7, 4, 1, 1, 9, 1, 8, 3, 1, 2, 8, 8, 3, 1, 1, 8, 0, 2, 8, 2, 2, 7, 3, 5, 8, 5, 0, 3, 1, 0, 2, 9, 7, 9, 7, 6, 8, 8, 0, 2, 5, 6, 3, 6, 4, 2, 6, 9, 0, 6, 4, 4, 0, 3, 4, 9, 9, 2, 6, 0, 8, 5, 5, 3, 0, 2, 1, 8, 2, 3, 8, 5, 5, 6, 6, 5, 7, 3, 9, 3, 9, 0, 9, 9, 8, 4, 8

Offset: 1

Clark Kimberling, Nov 02 2011

See A198866 for a guide to related sequences. The Mathematica program includes a graph.

			negative: -1.58112197220741191831288311802822735850...
positive:  0.86107767473955299024198236567037763109430...

Index entries for transcendental numbers.

Cf. A198866.

a = 2; b = 2; c = 3;
f[x_] := a*x^2 + b*Sin[x]; g[x_] := c
Plot[{f[x], g[x]}, {x, -2, 2}, {AxesOrigin -> {0, 0}}]
r = x /. FindRoot[f[x] == g[x], {x, -1.6, -1.5}, WorkingPrecision -> 110]
RealDigits[r](* A199069 *)
r = x /. FindRoot[f[x] == g[x], {x, .86, .87}, WorkingPrecision -> 110]
RealDigits[r] (* A199070 *)

A199070 Decimal expansion of x>0 satisfying 2x^2+2sin(x)=3.

Original entry on oeis.org

8, 6, 1, 0, 7, 7, 6, 7, 4, 7, 3, 9, 5, 5, 2, 9, 9, 0, 2, 4, 1, 9, 8, 2, 3, 6, 5, 6, 7, 0, 3, 7, 7, 6, 3, 1, 0, 9, 4, 3, 0, 3, 9, 3, 3, 5, 8, 1, 2, 7, 3, 9, 0, 8, 9, 2, 8, 5, 6, 4, 3, 0, 9, 6, 2, 6, 0, 8, 4, 5, 1, 8, 3, 9, 2, 1, 6, 9, 4, 9, 3, 0, 5, 8, 6, 3, 0, 8, 4, 2, 1, 8, 8, 4, 7, 9, 5, 1, 1

Offset: 0

Clark Kimberling, Nov 02 2011

See A198866 for a guide to related sequences. The Mathematica program includes a graph.

			negative: -1.58112197220741191831288311802822735850...
positive:  0.86107767473955299024198236567037763109430...

Index entries for transcendental numbers.

Cf. A198866.

a = 2; b = 2; c = 3;
f[x_] := a*x^2 + b*Sin[x]; g[x_] := c
Plot[{f[x], g[x]}, {x, -2, 2}, {AxesOrigin -> {0, 0}}]
r = x /. FindRoot[f[x] == g[x], {x, -1.6, -1.5}, WorkingPrecision -> 110]
RealDigits[r](* A199069 *)
r = x /. FindRoot[f[x] == g[x], {x, .86, .87}, WorkingPrecision -> 110]
RealDigits[r] (* A199070 *)

cp's OEIS Frontend

A199061 Decimal expansion of x<0 satisfying 2*x^2+sin(x)=1.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A199062 Decimal expansion of x>0 satisfying 2*x^2+sin(x)=1.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A199063 Decimal expansion of x<0 satisfying 2*x^2+sin(x)=2.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A199064 Decimal expansion of x>0 satisfying 2*x^2+sin(x)=2.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A199065 Decimal expansion of x<0 satisfying 2*x^2+sin(x)=3.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A199066 Decimal expansion of x>0 satisfying 2*x^2+sin(x)=3.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A199067 Decimal expansion of x < 0 satisfying 2*x^2+2*sin(x) = 1.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Extensions

A199068 Decimal expansion of x > 0 satisfying 2*x^2+2*sin(x) = 1.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

A199067 Decimal expansion of x < 0 satisfying 2x^2+2sin(x) = 1.

A199068 Decimal expansion of x > 0 satisfying 2x^2+2sin(x) = 1.

A199069 Decimal expansion of x<0 satisfying 2x^2+2sin(x)=3.

A199070 Decimal expansion of x>0 satisfying 2x^2+2sin(x)=3.