
Better approach than this brute force ?
 
mm <- NULL
for (i in dir(pattern="data")) { m <- readTable(i); mm <- cbind(mm, m[,4]) }
_________________________________________________________________


	[[alternative HTML version deleted]]

