Here is my problem: I got A right, but B is wrong... Can point out what I'm doing wrong? Thanks!(adsbygoogle = window.adsbygoogle || []).push({});

Develop a Mathematica procedure to find 5 roots of the following equations.

a.) x^5 + 5x^4 + 4x^3 + 3x^2 + 2x + 1 = 0

b.) e^x sin^2 x - cos x = 0

For part A, I got NSolve[x^5 + 5x^4 + 4x^3 + 3x^2 + 2x + 1 == 0, x]

And got 5 roots of the following:

{{x -> -4.19273}, {x -> -0.564099 -

0.390903 \[ImaginaryI]}, {x -> -0.564099 + 0.390903 \[ImaginaryI]}, {x -> \

0.160462\[InvisibleSpace] - 0.693272 \[ImaginaryI]}, {x -> 0.160462\

\[InvisibleSpace] + 0.693272 \[ImaginaryI]}}

But for part B, I did the procedure:

FindRoot[E^x Sin^2 x - Cos x == 0, x]

And gave me: FindRoot::fdss: Search specification x should be a list with a 2-5 elements. (FindRoot[\[ExponentialE]\^x\ Sin\^2\ x - Cos\ x == 0, x]\)

~TRI~

**Physics Forums - The Fusion of Science and Community**

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

# Mathematica Help

Loading...

Similar Threads - Mathematica Help | Date |
---|---|

Mathetica function (help fix my equation please) | Mar 15, 2016 |

Undetermined gauges (Help in mathematica)() | Oct 27, 2014 |

Help with "Which[] in a For loop using Mathematica | Sep 12, 2014 |

New to mathematica, some basic help needed | May 10, 2014 |

Mathematica NDSolve conditions help | Dec 22, 2013 |

**Physics Forums - The Fusion of Science and Community**