在R中繪制多個根

Question

我有一個方程式，我想為m值求解

m^2+x*m+1=0

我知道我可以使用polyroot(c(1,x,1))找到這些根。

我想將這些根在R中繪制為變化的x ，以便為x每個值繪制多項式的所有實根。

注意，多項式可能變得比這更復雜，排除了二次或三次公式的應用。

有關如何實現這一目標的任何想法？

謝謝！

Answer 1

我認為這樣做會有所幫助。 只需將X設置為您要評估的任何值即可。

X <- seq(0, 10, length=21)
roots <- sapply(X, function(x) polyroot(c(1,x,1))) 
roots[abs(Im(roots)) > 1e-10] <- NA
matplot(X, t(roots), pch=1)