tmpdata = list(date="", ...)
ヘッダー付
tmpdata<-read.table("E:\\users\\...\\testdata.txt", header=T, sep=",")
ヘッダーなし
tmpdata<-read.table("E:\\users\\...\\testdata.txt", sep=",")
リストへの読み込み
tmpdata<-scan("E:\\users\\...\\testdata.txt", what=list(date="", aaa=0, bbb=0, ccc=0, ddd=0, eee=0, fff=0) , sep=",", skip=1)
source("C:\\Splus\\....\\program"):fcnname<-function(arg1, arg2, ...){
....
}