Как отправить электронную почту в R, которая читает csv и сразу отправить несколько писем?

Question

У меня есть файл CSV, содержащий электронную почту. Как отправить несколько адресов электронной почты в r?

Ошибка 1 send.mail функция не принимает значения data.frame

Error in FUN(X[[i]], ...) : 
    Sorry, parameter type `NA' is ambiguous or not supported. 

Ошибка 2 функция не принимает входной сигнал от read.table

Error in file.exists(body) : invalid 'file' argument 

Мой код, как показано ниже (учетные данные в качестве пример только)

temp <- read.csv("E:/OneDrive/M.Tech/temp.csv",header = FALSE) 
m <- data.frame(temp) 
email <- m[2,14] 
rollno <- m[2,1] 

file <- read.table("C:/Mehul Katara/New folder (2)/131004.txt",header = TRUE,sep = ";") 

send.mail(from = "user@gmail.com", 
      to = email, 
      subject = rollno, 
      body = file,   
      smtp = list(host.name = "smtp.gmail.com", port = 465, user.name = "user@gmail.com", passwd = "password", ssl = TRUE),    
      authenticate = TRUE, 
      send = TRUE) 

Answer 1

Существует только одна ошибка с этим. Использование:

file <- read.table("C://Mehul Katara//New folder (2)//131004.txt",header = TRUE,sep = ";") 

Так что вам нужно изменить / в пути // из R окон двоичной поведении. Выше путь также может не работать, но в этом случае вам нужно избавиться от пробелов, как в «Mehul Katara». Пожалуйста, поместите свой файл в другое место, где нет места в пути к файлу. Ошибка 1 приходит только из-за ошибки 2 и должны идти, как только вы исправить ошибку 2.

Из документации

тело Тело письма в виде текста. Если тело параметра ссылается на существующее местоположение файла , текст файла анализируется как тело сообщения .

поэтому в идеале вы должны изменить вызов функции на что-то вроде:

send.mail(from = "user@gmail.com", 
      to = email, 
      subject = rollno, 
      body ="C://Mehul_Katara//New_folder_(2)//131004.txt" 
      smtp = list(host.name = "smtp.gmail.com", port = 465, user.name = "user@gmail.com", passwd = "password", ssl = TRUE),    
      authenticate = TRUE, 
      send = TRUE)