Re: Casting a Command as a String

*To*: mathgroup at smc.vnet.net*Subject*: [mg58962] Re: Casting a Command as a String*From*: ggroup at sarj.ca*Date*: Mon, 25 Jul 2005 01:12:16 -0400 (EDT)*References*: <dbv9og$efo$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Hi Bruce, Can you modify your routine to do something like the following? x = { Hold[Plot[Sin[x], {x, 0, 2*Pi}]], Hold[Plot[Cos[x], {x, 0, 2*Pi}]] }; y = Table[ ToString[x[[i]]] // StringDrop[#, 5] & // StringDrop[#, -1] &, {i, \ Length[x]}] x1 = ReleaseHold[x]; Table[Show[x1[[i]], PlotLabel -> y[[i]]];, {i, Length[x1]}];

**Follow-Ups**:**Re: Re: Casting a Command as a String***From:*stephen layland <layland@wolfram.com>