Создание папок внутри директории в R и сохранение результатов там с именами файлов для сохранения графиков

Question

У меня есть данные на 150 менеджеров. Я создал шесть графиков для каждого менеджера. Мне нужно создать папку для каждого менеджера, которая содержит все эти графики (итого 150 папок, в которых шесть графиков). Есть ли дженерик c l oop, который я мог бы использовать для этого?

Пока все, что мне удалось, это:

setwd("C:/Users/zeina/Desktop/Gunter")
subfolder_names <- c(1:150) 
for (i in 1:length(subfolder_names)){
    folder<-dir.create(paste0("Manager - ", subfolder_names[i]))
}

. Это создает папки для меня (напр. Менеджер - 1, Менеджер - 2 и т. Д. c.). Но я не знаю, как тогда заставить R сохранить графики для меня в каждой из этих папок для каждого менеджера

Answer 1

Вам необходимо добавить дополнительные операторы внутри l oop. Для каждого l oop вам нужно установить wd в папку, которую вы только что создали, а затем сохранить графики там. Вы также можете добавить дополнительные l oop для файлов графиков.

setwd("C:/Users/zeina/Desktop/Gunter")
subfolder_names <- c(1:150) 
for (i in 1:length(subfolder_names)){
    setwd("C:/Users/zeina/Desktop/Gunter")
    folder<-dir.create(paste0("Manager - ", subfolder_names[i]))
    setwd(paste0("C:/Users/zeina/Desktop/Gunter/", "Manager - ", subfolder_names[i]))
    for (i in 1:length(subfolder_names)){
        jpeg(file=paste0("plot", i, ".jpeg")
        # Here you need to type the code for plot #
        dev.off()
    }
}

Если вы хотите сохранить графики с расширениями, отличными от jpeg, просто измените jpeg() на это расширение, то есть png().