Dismiss Notice
Join Physics Forums Today!
The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

Mathematica help

  1. Sep 19, 2010 #1
    Hi, I'm using NSolve in Mathematica but I only want to find the roots that are real numbers as my answer gives a lot of imaginary numbers. How can I do this?

    I want to then plot a birfucation diagram using a table of data. Is there a function to do this?

    Thanks!
     
  2. jcsd
  3. Sep 19, 2010 #2
    In[1]:=x /. NSolve[(x - 1)(x^2 + 3)(x^4 + 5) == 0, x]
    Out[1]={-1.05737 - 1.05737*I, -1.05737 + 1.05737*I, -3.81167*^-27 - 1.73205*I,
    -3.81167*^-27 + 1.73205*I, 1., 1.05737 - 1.05737*I, 1.05737 + 1.05737*I}

    In[2]:=Cases[x /. NSolve[(x - 1)(x^2 + 3)(x^4 + 5) == 0, x], _Real]
    Out[2]={1.}

    http://search.wolfram.com/?query=bifurcation&x=5&y=4
     
  4. Oct 3, 2010 #3
Know someone interested in this topic? Share this thread via Reddit, Google+, Twitter, or Facebook




Similar Discussions: Mathematica help
  1. Mathematica help (Replies: 1)

  2. Help With Mathematica (Replies: 2)

  3. Mathematica help (Replies: 1)

  4. Help in Mathematica (Replies: 15)

  5. Help with Mathematica? (Replies: 1)

Loading...