使用lapply功能和文件RDS RData合并多个数据帧

Question

晚上好，我想复制此博客https://www.r-bloggers.com/how-to-perform-merges-joins-on-two-or-more-data-frames-with-base-r-tidyverse-and-data-table/中的功能合并多个数据框

flightsList <- readRDS(url(paste0(dataurl, "r006/nycflights13-list.rds")))
lapply(flightsList, function(x) c(toString(dim(x)), toString(names(x)))).

我已经尝试了很多方法，但是我无法合并不同暗淡的表。

atencionesList <- serialize(list("iatencion","iatencion_apo", "iatencion_dia", "iatencion_ins", "iatencion_med", "iatencion_ser",  
                    "iatencion_smi", "padron_nominado"), NULL)



atencionesList <- readRDS(paste0("~/GitHub/salud2018/Lima2019/Anelima/atenciones1.RDS"))
lapply(atencionesList, function(x) c(toString(dim(x)), toString(names(x))))

#****************************
atencionesList <- load(paste0("~/GitHub/salud2018/Lima2019/Anelima/atenciones.RData"))
lapply(atencionesList, function(x) c(toString(dim(x)), toString(names(x))))
#**********************************************

 multiFull <- merge(merge(merge(merge(merge(merge(merge(
+ atencionesList[[1L]],
+ atencionesList[[2L]], all = TRUE),
+ atencionesList[[3L]], all = TRUE),
+ atencionesList[[4L]], all = TRUE),
+ atencionesList[[5L]], all = TRUE),
+ atencionesList[[6L]], all = TRUE),
+ atencionesList[[7L]], all = TRUE),
+ atencionesList[[8L]], all = TRUE)

与带有飞往我的航班数据的博客示例不同，我不会留下一个单独的数据框，该数据框通过表中的dni，日期和其他变量将一个表关注点与另一个表关注点联系起来。

Answer 1

例如，我能够在数据库中进行更改，在data.table中转换标题。如您所见，我已经完成了通过合并功能合并多个小标题的任务，现在的问题是，如所附代码所示，内存不足。

project-c

错误：找不到大小为30.4 Mb的向量

现在，我的问题显然是内存不足，尽管我的电脑具有以下功能：

const query = Property.find({ city: { $exists: true } })
    .populate('city', { name: '' })