如何使用循环合并多个数据框？

Question

我有下面的代码，我认为这可以让我将几个数据框合并在一起。

codes <- c('agglevel','industry','ownership','size','area')
ann2012full <- ann2012
for(i in 1:length(codes)){
eval(parse(text=paste('ann2012full <- left_join(ann2012full,
',codes[i],')', sep='')))
}

好像前3个文件合并正常，当我收到第4个文件时，收到此错误消息。

Error in left_join_impl(x, y, by$x, by$y, suffix$x, suffix$y, check_na_matches(na_matches)) : 
  Can't join on 'own_code' x 'own_code' because of incompatible types (integer / character)

我猜测必须有一种方法可以将整数强制转换成字符，然后进行合并。我只是不确定如何让它工作。我希望有一个优雅的循环选项，而不是这5个独立和不同的方式。感谢。