請問:
Solve[x^3+x^2-2==0,x]
它會把實數解跟複數解全部算出來:
{{x -> -1 - i}, {x -> -1 + i}, {x -> 1}}
要怎麼讓它只留實數解?? 像這樣:
{{x -> 1}}
謝謝

Select[%, Im@#[[1, 2]] == 0 &]

古早的 Mathematica 有一個叫做 RealOnly 的東西, 現在沒了想要的話可以從這兒抓:http://library.wolfram.com/infocenter/MathSource/6771/引入這東西之後所有是複數東西的都會被 Nonreal 取代

Solve[x^3 + x^2 - 2 == 0, x, Reals] 應該是8.0之後都可以加定義域，限制式