r - 在 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)