Получить список всех пакетов, загруженных во все файлы .Rmd в каталоге

Question

Предположим, у меня есть 2 (или любое количество) .Rmd файлов в ~/directory1/. В каждом файле я загружаю несколько пакетов R, используя library(packagename). Как получить вектор символов, содержащий имена всех уникальных пакетов, загруженных во все эти файлы?

Answer 1

#setwd(~/directory1/)
libs = lapply(list.files(pattern = "\\.Rmd$"),
              function(x){
                  d = readLines(x)
                  d = d[grepl("library\\(.*\\)", d)]
                  gsub("library\\((.*)\\)", "\\1", d)
              })
unique(unlist(libs))