mail_through_mailR

library(mailR)
sender <- "hello@mail.com"
recipient <- "m.p.kosinski@gmail.com"
  send.mail(from = sender,
            to = recipient,
            subject = "Subject",
            body = "Hello World!",
            smtp = list(host.name = "smtp.gmail.com", port = 465, 
                        user.name = "hello@gmail.com",            
                        passwd = pwd, 
                        ssl = TRUE),
            authenticate = TRUE,
            send = TRUE)
}