
[英]Using a For-loop to create multiple objects with incremental suffixes, then reading in .csv file to each new object (also with incremental suffixes)
[英]Use a for-loop to create list-objects for each file from file directory
我有一個創建的文件列表:
d <- list.files(path = "C:/data/", pattern = ".TextGrid")
我想在每個這些文件上運行textgRid包的TextGrid()命令。 這將為每個文件創建一個列表對象。 這些我想另存為列表對象,並以文件名作為對象名。
我努力了:
for (file in d) {file <- TextGrid(paste0("C:/data", file))}
謝謝您的幫助
以您的代碼為起點:
for (file in d) {
tmp <- TextGrid(paste0("C:/data/", file))
assign(file, tmp)
}
這是我的使用lapply而不是循環的解決方案,我從未使用過textgRid包,因此希望可以使用。
d <- lapply(list.files(pattern = "\\.TextGrid$"),TextGrid)
names(d)<-paste0("C:/data",list.files(pattern = "\\.TextGrid$")
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.