左加入多个列表 tbl

Question

我有一个嵌套在一个列表中的多个 tbl。所有 tbl df 都有一个 ZIPCode 列。我有一张表格，我从邮政编码包中接收数据，这样我就可以获得每个邮政编码的纬度和经度。

我想将纬度和经度加入到每个 tbl 上，以便稍后用于传单。我尝试将其设置为：

zip = lapply(myfiles, function(x){
z = left_join(myfiles, zip_filtered, by=c("ZIPCode"="zip"))
return(z)
})

这会引发以下错误：

UseMethod("left_join") 中的错误： 没有适用于“list”类对象的“left_join”方法

然后我尝试了以下方法来通过：

zip = lapply(myfiles, function(x){
z = x[,left_join(x, zip_filtered, by=c("ZIPCode"="zip"))]
return(z)
})

这给了我以下信息：错误：不支持的索引类型：tbl_df。

最好的方案是将纬度和经度两列附加到列表中的所有六个 tbl_df，但不确定如何执行此操作，这就是我开始沿着这条路线走下去的原因。

谢谢！

Answer 1

试试这个as seen here

myfiles %>% reduce(left_join)