R 将函数应用于多个文件并将数据逐行保存到数据框？

我正在使用

for

循环将几个函数应用于我工作目录中的文本文件，然后使用

writeLines

函数将新文件写入目录。在每次迭代结束时，我想在一个名为

d.f

的数据框中记录文件名和行数

我使用以下方法创建了一个数据帧：

d.f <- (file_name,number_of_rows)

d.f
myu文件
my_files <- list.files(path="path to my wd")    
for (i in 1:length(my_files) { ..........
.........
.........
a <- readLines(my_files[i], skipNul=TRUE)
.........
.........
# here is the line I tried to add to record the data:
d.f <- rbind(my_files[i], length(a))
}

my_files <- list.files(path="path to my wd")
a <-  readLines(my_files[1], skipNul=TRUE)
d.f <- data.frame(my_files[1],nrow(a))
for (i in 2:length(my_files) { ..........
.........
.........
a <- readLines(my_files[i], skipNul=TRUE)
.........
.........
dummy <- data.frame(my_files[i],nrow(a))
names(dummy) <- names(d.f)
d.f <- rbind(d.f,dummy)
}