在 R 中的多个 csv 文件中将唯一列分隔为多个列

Question

我试图在多个 csv 文件中分离一个唯一列。 我已经使用以下代码为一个文件完成了它：

tempmax <- read.csv(file="path", header=TRUE, sep=";", fill = TRUE) 
colnames(tempmax) = c("Fecha", "Hora", "Temperatura max")
rbind(tempmax)
write.csv(tempmax, "path", sep = ";", append = FALSE, row.names = FALSE, col.names = FALSE)

但是，我还没有找到保存在文件夹中的多个 csv 的方法。 我也想做同样的事情：阅读、修改和编写新的。

我用它来读取多个文件：

getwd <- ("path")
filenames <- list.files("path", 
                        pattern = "*.csv", full.names = TRUE)

但我只是找不到编辑我想要的东西的方法。 （我是使用 R 的新手）感谢您的帮助。 谢谢！

Answer 1

如果我们有多个文件，我们可以使用lapply 。 转型还不是很清楚。 因此，通过选择第一列将文件写回

lapply(filenames, function(file){
      tempmax <- read.csv(file= file, header=TRUE, sep=";", fill = TRUE) 
      colnames(tempmax) = c("Fecha", "Hora", "Temperatura max")

      write.csv(tempmax[1], file, sep = ";", append = FALSE,
             row.names = FALSE, col.names = FALSE)})