Объединение нескольких файлов .rds в один

У меня есть несколько файлов .rds, которые мне нужно объединить в один файл .rds.

[1] "RDS_Species/SeaTurtles/Caretta_caretta_IUCN.rds"       
[2] "RDS_Species/SeaTurtles/Chelonia_mydas_IUCN.rds"        
[3] "RDS_Species/SeaTurtles/Dermochelys_coriacea_IUCN.rds"  
[4] "RDS_Species/SeaTurtles/Eretmochelys_imbricata_IUCN.rds"
[5] "RDS_Species/SeaTurtles/Lepidochelys_olivacea_IUCN.rds"

Мне удалось объединить их в один список:

SeaTurtles_IUCNdist <- list.files(path="RDS_Species/SeaTurtles/",
                                  pattern = ".rds$", full.names = TRUE) %>%
  map(readRDS) 

Файлы .rds - это файлы data.frame. Что мне делать, чтобы объединить их в один большой файл .rds?

Заранее спасибо!


r sf
person MayaBoueiz    schedule 03.05.2021    source источник


Ответы (1)


Мы можем использовать map_dfr

library(dplyr)
library(purrr)
SeaTurtles_IUCNdist <- list.files(path="RDS_Species/SeaTurtles/",
                              pattern = ".rds$", full.names = TRUE) %>%
         map_dfr(readRDS) 
person akrun    schedule 03.05.2021
comment
Спасибо за быстрый ответ! Но когда я попытался его сохранить, то получил такую ​​ошибку: > st_write(SeaTurtles_IUCNdist, "RDS_Species/RasterStacks/AllSeaTurtles_IUCNdist.rds") Error: Could not guess driver for RDS_Species/RasterStacks/AllSeaTurtles_IUCNdist.rds - person MayaBoueiz; 03.05.2021
comment
Неважно! Только что прикинул, что делаю не так с сохранением !!! Большое спасибо! - person MayaBoueiz; 03.05.2021