Мозаика нескольких групп вместе в R

Question

У меня есть два снимка Landsat, каждый из которых имеет 7 полос. Я хочу наложить мозаику на каждую полосу для каждого изображения друг на друга, используя R. Я использовал мозаику в пакете Raster для мозаичного объединения двух стеков, но на это уходит очень много времени. Я также попытался использовать цикл for для перебора файлов в списке, но, похоже, не могу заставить это работать. Какие-либо предложения?

l8151 <- list.files("G:/Madagascar/Data/Landsat/2015/LC081580712015091201T1-SC20171023160514", pattern = glob2rx("*band*.tif$"),
                full.names = TRUE)
l8152 <- list.files("G:/Madagascar/Data/Landsat/2015/LC081580712015091201T1-SC20171023160515", pattern = glob2rx("*band*.tif$"),
                full.names = TRUE)
for (i in 1:7){
    mosaic_rasters(gdalfile = c(l8151[[i]],l8152[[i]]), dstdataset = paste0("G:/Madagascar/Data/Landsat/2015/", paste0("2015_", str_sub(l8152, start = -8)), separate = TRUE, verbose = TRUE))
}