Я использовалextract функция отraster пакет для извлечения данных из растровых файлов, используя область, определенную шейп-файлами. Однако у меня проблемы с объемом памяти, который требуется для этого процесса. У меня есть большое количество шейп-файлов (~ 1000). Большие растровые файлы (~ 1.6 ГБ)

Мой процесс:

shp <- mclapply(list.files(pattern="*.shp",full.names=TRUE), readShapePoly,mc.cores=6)
ndvi <- raster("NDVI.dat")
mc<- function(y) {
temp <- gUnionCascaded(y)
extract <- extract(ndvi,temp)
mean <- range(extract, na.rm=T )[1:2]
leng <- length(output)
}
output <- lapply(shp, mc)

Могу ли я внести какие-либо изменения, чтобы уменьшить нагрузку на память? Я попытался загрузить меньше шейп-файлов, которые работали в течение 5 минут, прежде чем память снова взлетела. Это четырехъядерный компьютер 2,4 ГГц с оперативной памятью 8 ГБ