Re: change PlotStyle in Graphics object after the fact?

*To*: mathgroup at smc.vnet.net*Subject*: [mg47285] Re: change PlotStyle in Graphics object after the fact?*From*: bobhanlon at aol.com (Bob Hanlon)*Date*: Fri, 2 Apr 2004 03:30:39 -0500 (EST)*References*: <c4ggg8$3kb$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Needs["Graphics`Colors`"]; p1=Plot[x,{x, -1, 1}, DisplayFunction->Identity]; p2=Plot[x^2,{x, -1, 2}, DisplayFunction->Identity]; Show[{ p1 /. Graphics[{x__}, y__]-> Graphics[{Blue, AbsoluteDashing[{5}], x}, y], p2 /. Graphics[{x__}, y__]-> Graphics[{Red, AbsoluteDashing[{10}], x}, y]}, DisplayFunction->$DisplayFunction]; Bob Hanlon In article <c4ggg8$3kb$1 at smc.vnet.net>, jflanigan at netzero.net (jose flanigan) wrote: << I have a number of graphics objects created like p1=Plot[f[x],{x,-1,1}] p2=Plot[g[x], {x,-1,2}] and I was wondering if I can change the PlotStyle on p1 and p2 by doing something like p2/.PlotStyle->{new plot style options} Any ideas?