为多个数据框或.csv文件应用函数

Question

我有一个问题，我想为几个数据框应用一个函数，我称之为如下：

temp = list.files(pattern="*.csv")
for (i in 1:length(temp)) assign(temp[i], read.csv(temp[i], sep = ";"))

在我创建的函数ajuste_tiempos之后，如下所示：

ajuste_tiempos <- function(datos) {

tiempos <- datos$HOUR
timestamps <- as.POSIXlt(as.POSIXct('1900-1-1', tz='UTC') 
                     + as.difftime(as.character(tiempos)))
timestamps$min <- (timestamps$min + 5/2) %/% 5 * 5
time <- format(timestamps, format='%H:%M:%S')
date<-paste(datos[,3], time, sep=" ")
date
}

基本上它是我想要应用的函数，但在将此函数应用于数据框之后，我想对列进行其他操作。我这样试试：

ajuste_tiempos <- list()
ff <- list(temp[i])
a <- lapply(ff, function(i) {ajuste_tiempos(i)})

有谁知道我该怎么办？