задача mailR блокирует порт R сервера - PullRequest
0 голосов
/ 27 июня 2018

Я запланировал еженедельную задачу от R Server, которая состоит из генерации CSV-файла и отправки его через пакет mailR:

library(mailR,lib='~/packages')
sender <- "bla@gmail.com" 
recipients <- c("bla1@gmail.com","bla2@hotmail.com") 
email <- send.mail(from = sender,
                   to = recipients,
                   subject=paste0("Task, week ",min(total$week)),
                   body = "Good morning, \n\nI've attached last week file. \n\nRegards,",
                   attach.files =c(paste0("~/path/task_", substr(Sys.Date()-7,1,4)," week ",min(total$week),".csv")),
                   smtp = list(host.name = "smtp.gmail.com", port = 465, user.name = sender,passwd = "******", ssl = TRUE),
                   authenticate = T,
                   send = TRUE)

Работает нормально, но после первого выполнения, когда я пытаюсь подключиться с R Server к Google Analytics API, BigQuery ... через аутентификацию токена, появляется следующее сообщение:

Error in httpuv::startServer(use$host, use$port, list(call = listen)) : 
  Failed to create server

Похоже, эта задача блокирует порт. Есть идеи, как этого избежать?

Заранее спасибо,

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...