Я сделал что-то вроде этого для чтения изображений:
path <- "C:\\Users\\me\\Desktop\\images"
jpgFiles <- list.files(path, pattern="*jpg$", full.name=TRUE)
jpgList <- lapply(jpgFiles, readJPEG)
Теперь я хочу сделать то же самое, но вместо чтения я хочу сохранить изображения из jpgList в новую папку.Как я могу это сделать?