R: автоматизировать быстрый ответ в цикле функции

Question

Я пытаюсь зациклить функцию edgar::getFilings для загрузки 10Q и 10K для разных компаний в разные годы.

Для каждого запуска функция запрашивает:

Total number of filings to be downloaded=1. Do you want to download (yes/no)?

Я должен ввести yes в командной строке для каждой итерации цикла. Есть ли способ, которым я могу избежать этого?

library(edgar)
companies = c(19617,886982,895421,831001,070858)
years = c(2017,2018)
reports = c('10-K','10-Q')
getMasterIndex(years)

mylist = list()

for (i in 1:length(companies)) {
  for (t in 1:length(years)) {
    for (j in 1:length(reports)) {
      mylist[[paste(companies[i],years[t],reports[j],sep = "_")]] = 
        getFilings(years[t], companies[i], reports[j])
    }
  }
}