how to add graphics options in a plot which is already produced and has a manipulator
- To: mathgroup at smc.vnet.net
- Subject: [mg126648] how to add graphics options in a plot which is already produced and has a manipulator
- From: Jennifer <ptewari786 at gmail.com>
- Date: Tue, 29 May 2012 05:44:04 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
Hi all,
I am novice to mathematica and stuck into one problem i.e.
how can I add graphics option to an already made plot which has a manipulator to control itself.
s = Manipulate[
PopupWindow[
Graphics[
DiscretePlot[Sin[a t], {t, 0, 2 Pi, Pi/6}, ExtentSize -> Full,
ImageSize->Scaled[1], AspectRatio -> .2]], {a}],
OpenerView[{"Vertical", Control[{{a, 1, "Manipulator"}, 1, 30}]}],
ControlPlacement -> Bottom]]
Now I want to add a plot Label by calling the already produced plot s.Because I dont want the duplication of code again as I have to use 4 more different plots in a popupmenu. For eg. when I select s from popupmenu then it should give the output t
t= Show[ s, PlotLabel->"Popup Window Plot"] but this is showing error "Show::gtype: Manipulate is not a type of graphics"