Re: Adding computed values to a Contourplot function
- To: mathgroup at smc.vnet.net
- Subject: [mg118611] Re: Adding computed values to a Contourplot function
- From: Dan <dflatin at rcn.com>
- Date: Wed, 4 May 2011 06:35:17 -0400 (EDT)
- References: <ipoioe$g1h$1@smc.vnet.net>
On May 3, 5:43 am, sigismond kmiecik <sigismond.kmie... at wanadoo.fr>
wrote:
> Hello to everybody
>
> How can I modify the code below (after Epilog) in order to add after
> "b^2-4ac=" its computed value and have everyhing framed?
>
> a=0.5;b=1;c=6;d=2;e=3;f=-30;
> ContourPlot[{a x^2 +b x*y + c y^2 + d x + e y - 30 == 0 }, {x, -12,
> 10}, {y, -8, 8}, ContourStyle-> {Red, Thick}, Axes -> True, AxesLabel-> {x,y} ,
>
> Frame-> False,ImageSize-> {550,400}, Epilog->{Text[Style["b^2 -
> 4ac=",FontSize-> 20],{5,5}]}]
>
> I haven't found in the Mathematica 8 Documentation center a similar example.
>
> Thanks
>
> Sigismond Kmiecik
Yet another form is
Epilog -> {
Text[Style[StringForm["b^2 - 4ac = ``", b^2 - 4 a c], 20], {5, 5}]
}
or for a 2D formatted look
Epilog -> {
Text[
Style[
StringForm["`1` = `2`", HoldForm[b^2 - 4 a c], b^2 - 4 a c], 20
], {5, 5}
]
}
StringForm[<string with x = `` parameter slots>, x] is similar to
sprintf and other standard computing language formatted text output.