
Re: How to extract from list
Posted:
May 27, 2013 4:20 AM


I modified slightly your data, making the four freq values more or less equally spaced: orig={{1.8,13.8,34,134},{10.9,6.4,44,94},{20.0,2.7,62,52},{54.,6.8,250,189}} b=Transpose[orig];c=Table[{b[[1]],b[[j]]},{j,2,4}]; ListPlot[Transpose/@Table[c[[j]],{j,1,3}],PlotStyle>PointSize[0.025]] ListLinePlot[Transpose/@Table[c[[j]],{j,1,3}],PlotStyle>PointSize[0.025]] Show[%, %%]
Tomas
> From: jlfisher@imt.net > Subject: How to extract from list > To: mathgroup@smc.vnet.net > Date: Sun, 26 May 2013 05:07:41 0400 > > I have a list/array as follows:: > > {{1.8, 13.8, 34, 134}, {1.9, 6.4, 44, 94}, {2.0, 2.7,62, 52},..........,{54., 6.8, 250, 189}} > > The first entry is a frequency ex 1.8 MHz > The other values are SWR[13.8], Resistance[34], Reactance[134]. > > I want to plot the last three values on three line graphs in different colors using the first value [freq] at the bottom [as the dependent]. > > As you can see the freq goes from 1.8 to 54 Mhz. > > How can I plot this list/array [three lines] please ? > > Thanks >

