if (FALSE) {
LF = list.files(path="/home/lees/Class/GEOL_105/TESTBANK/EXAM_1", pattern="txt", full.names=TRUE )
kbank = vector(mode='list')
###### read in the question banks, each in one file
for(i in 1:length(LF))
{
h = Get.testbank(LF[i])
kbank[[i]] = Get.testbank(LF[i])
}
names(kbank) = LF
cbind( seequestions(kbank[[1]]) )
}
Run the code above in your browser using DataLab