LISTS and more LISTS

*To*: mathgroup at smc.vnet.net*Subject*: [mg2829] LISTS and more LISTS*From*: "cjkelly at bu.edu" <cjkelly at bu.edu>*Date*: Sat, 23 Dec 1995 03:18:02 -0500

Enclosed is a little ditty I've been trying to get to work but as is clear, it has a bug and I have no clue as to what is wrong. It is just supposed to extract elements out of a LIST then peform various operations on these elements one of which is to plot a series of lines (or rays) starting from the point {25,5} Clear [f,x] x={10,8,6,5.5,5.4,5.3,5.2,5.1,5.01,5.001,5.0001,5.0001} f[x_]=x^2 Do [Line[{{5,25},{x[[i]],f[x[[i]]]}},{i,Length [x]}]] Clear [f,x] x={10,8,6,5.5,5.4,5.3,5.2,5.1,5.01,5.001,5.0001,5.0001} f[x_]=x^2 Do [Line[{{5,25},{x[[i]],f[x[[i]]]}},{i,Length [x]}]]