RE: DisplayTogether

*To*: mathgroup at smc.vnet.net*Subject*: [mg31305] RE: [mg31280] DisplayTogether*From*: "David Park" <djmp at earthlink.net>*Date*: Sat, 27 Oct 2001 01:08:14 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

Markus, When I try your statement (with an extra "]" added) I get only one plot. You first plot could be more easily done with Plot[{2t, 3t}, {t, 0, 1}]; With your second example you have different plot domains for each function. This can be done much more easily with functional programming. Needs["Graphics`Graphics`"] DisplayTogether[Plot[{#t}, {t, #, # + 1}] & /@ {1, 2, 3}]; David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ > From: Markus Riedle [mailto:riedle at mathematik.hu-berlin.de] To: mathgroup at smc.vnet.net > > I tried to use the Function "DisplayTogether", say > > << Graphics`Graphics` > DisplayTogether[Plot[3t,{t,0,1}], Plot[2t,{t,0,1}] > > The results are 2 Plots and not one, as expected. What is my mistake? > The root of the question is, how can I number "graphicsobject" > by an index > or how can I make a list of graphicsobjects, say in a for-loop: > > For[i=1, 1<<10, i++, > g??? =Plot[ f[t][i], {t, i, i+1}] ] > > It doesn't work g[[i]] or g[i]. > > Thanks a lot for your help, > Markus > > > >