Re: I want a plot label that shows interactively the values of a
- To: mathgroup at smc.vnet.net
- Subject: [mg120877] Re: I want a plot label that shows interactively the values of a
- From: "Chris Degnen" <degnen at cwgsy.net>
- Date: Sun, 14 Aug 2011 08:13:06 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <j25ktl$ov3$1@smc.vnet.net>
You could try something like this,
adapted from the help examples on Manipulate and Epilog:-
Manipulate[
Plot[Sin[x(1+p2*x)],{x,0,6},
Epilog->{Inset[
Text[Style["p2="<>ToString[p2],20,If[p2<1,Red,Black]],
Background->LightGray],{Right,Top},{Right,Top}]}],{p2,0,2}]
----- Original Message -----
From: "Massimiliano LANDI" <landim at smu.edu.sg>
Newsgroups: comp.soft-sys.math.mathematica
Sent: Saturday, August 13, 2011 11:50 AM
Subject: [mg120877] I want a plot label that shows interactively the values of a
> Hello everyone
>
> I am trying to add to a plot I created a text that shows the value of a
> variable, call it p2, that can be changed via Manipulate.
>
> So I did:
>
> Manipulate[
> Plot[....,Epilog->{Text[Style["p2=" p2, 18, If[(A/(1 + B n) <= p2 <= (A
> + A n)/(1 + n + B n) && k == 2) || (p2 == 1 && k == 1), Red, Black],
> Background -> LightGray]}],
> ...]
>
> The funny thing is that with this code, in the text label, the actual
> value of the variable appears before the text p2.
>
> For example, when I set p2=10, the label in the graph becomes
>
> 10 p2
>
> whereas I would like to see
>
> p2 = 10
>
> Any help?
>
> Thanks in advance
>
> Massimiliano Landi