Re: How to add a Locator (Tooltip) to RootLocusPlot?

• To: mathgroup at smc.vnet.net
• Subject: [mg128631] Re: How to add a Locator (Tooltip) to RootLocusPlot?
• From: Bob Hanlon <hanlonr357 at gmail.com>
• Date: Sun, 11 Nov 2012 01:28:28 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-newout@smc.vnet.net
• Delivered-to: mathgroup-newsend@smc.vnet.net
• References: <20121110070932.E12846972@smc.vnet.net>

```rlPlt = RootLocusPlot[
k (s^2 + 2 s + 4)/
(s (s + 4) (s + 6) (s^2 + 14/10 s + 1)),
{k, 0, 150}];

roots[s_, loc_] = Solve[
loc (s^2 + 2 s + 4)/
(s (s + 4) (s + 6) (s^2 + 14/10 s + 1)) == -1,
s];

Manipulate[
Show[
rlPlt,
Graphics[{Gray, AbsolutePointSize[8],
Tooltip[Point[#],
"k==" <> ToString[loc]] & /@
({Re[s], Im[s]} /.
roots[s, loc])}]],
{{loc, 50, "Gain (k)"}, .5, 150, .5,
Appearance -> "Labeled"}]

Bob Hanlon

On Sat, Nov 10, 2012 at 2:09 AM, Eduardo Mendes <emammendes at hotmail.com> wrote:
> Hello
>
> I wonder whether someone out there would know how to add a Locator or
> Tooltip or something else that allows me to see the values of the
> parameter k (See command below) when the mouse passes over the resulting
> curves? Unfortunately I have no idea on how to do it.
>
>
> RootLocusPlot[k (s^2+2 s+4)/(s(s+4)(s+6)(s^2+1.4s+1)),{k,0,150}]
>
> Many thanks
>
> Ed
>
>
>

```

• Prev by Date: Re: piecewise and if
• Next by Date: Manipulating a list with unknown number of elements.
• Previous by thread: How to add a Locator (Tooltip) to RootLocusPlot?
• Next by thread: Re: How to add a Locator (Tooltip) to RootLocusPlot?