for example
data <- read.csv("data.txt")
typeof(data)
[1] "list"
for (i in 1:nrow(data)){

	[[alternative HTML version deleted]]

