search for: colname3

Hi I would like to shorten mod1 <- nls(ColName2 ~ ColName1, data = table, ...) mod2 <- nls(ColName3 ~ ColName1, data = table, ...) mod3 <- nls(ColName4 ~ ColName1, data = table, ...) ... is there something like cols = c(ColName2,ColName3,ColName4,...) for i in ... mod[i-1] <- nls(ColName[i] ~ ColName1, data = table, ...) I am looking forward to help Christof

...- it''s also only been tested for 5mins. Even so I thought it might be useful. I thought about adding it to the wiki, but thought I should check here first. # lookup items from a CSV file # v0.1 - 2007/06/06 # Adrian Bridgett, Opsera Ltd. # file in the format of: # colname1, colname2, colname3,... (must be first line) # key1, value2, value3,... # key2, value4, value5 # # lookup_csv(filename,key1,colname3) will then return value3 # # TODO: # proper CSV parsing (e.g. quoting) # regexp on the value? # return a supplied default if row not found? # add Excel and Openoffice support module Pu...