对r中的不同数据帧应用相同的操作

Question

我试图将相同的函数应用于几个数据帧。我的数据是这样的。我有几个不同年份的数据帧。我想去掉特定年份的名称，以便将数据帧合并为一个。

year_1995199519951995

改变顺序，将myfunc放在括号内:

files <- list(workers_1995, workers_1996)
myfunc <- function(onefile){
onefile %>% 
rename(igang=starts_with("igang")) %>% 
rename(year=starts_with("year")) 
}
lapply(files, myfunc)