1
$\begingroup$

I have a polynomial equation of the fourth order, which has $4$ roots depending on a variable parameter s1. For each s1 I have $4$ solutions. I need a LinePlot of all roots to see how they move in the complex plane when the parameter s1 changes. I can solve my equation but I don't know how to plot all the roots together on one diagram (points connected with line for each solution).

poly = -6.110000000000001`*^6 k^4 + 1000.` s1^2 + 60.335263000000005`(-5.` k + s1)^2;

Table[ NSolve[ poly == 0, k], {s1, {0.1, 0.2, 0.3, 0.4, 0.5, 0.6, 0.7, 0.8, 0.9}}]
Improve this question
$\endgroup$
3

1 Answer 1

Reset to default
7
$\begingroup$

You can use RootLocusPlot.

poly = -6.110000000000001`*^6 k^4 + 1000.` s1^2 + 60.335263000000005` (-5.` k + s1)^2;

RootLocusPlot[1/poly, {s1, 0, 1}, FeedbackType -> None, 
PoleZeroMarkers -> {"ParameterValues" -> Range[0.1, 0.9, 0.1]}]

enter image description here

Improve this answer
$\endgroup$
1
  • $\begingroup$ Glad it solved your problem. $\endgroup$
    – Suba Thomas
    Apr 1, 2014 at 16:37

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

Not the answer you're looking for? Browse other questions tagged or ask your own question.