在一个图中为每个csv读取几个csv文件和相同的图形

Question

我在一个目录中有一个12个csv文件的列表，我想为另一个csv文件绘制另一个列中的一个列，并且应该出现12个图并保存在一个文件中。 我已经尝试了以下适用于一个csv文件的代码，但是只要我设置循环来读取每个文件，它就不起作用。

library(lattice)
fichiers <- list.files(wd_envt_travail3, pattern=".csv")  
# wd_envt_travail3 = path where the files are

numfiles <- length(fichiers) 
df <- data.frame()

# i=2: test

# Reading of all the files
for(i in 1:numfiles){
   xx <- read.csv(as.character(fichiers[i]),sep=";")
   df <- rbind(df, xx)  
   xyplot(df$hauteur_epi_2 ~ df$hauteur_epi_1, df, xlim=c(0,15),ylim=c(0,15))
}

任何建议将不胜感激。 非常感谢您提前