[R] Does R have a command for sending emails?
Fernando Saldanha
fsaldan1 at gmail.com
Tue May 10 15:27:38 CEST 2005
I want to thank all who have offered help on this topic. I was able to
create a very simple email function that I have tested to work under
Windows XP Professional and R 2.1.0. It uses Blat version 1.9.4.
send.mail<-function(addr, subject, source.file) {
mail.cmd <- paste("Blat", source.file, "-subject", dQuote(subject),
"-to", addr, separator = " ", collapse = "")
system(mail.cmd, intern = FALSE)
}
The string source.file must have double backslashes instead of single
backslashes. For example:
C:\\myfolder
One must first install Blat version 1.9.4, available at
http://www.blat.net/194/.
All that is needed is to unzip the downloaded file (Blat194.zip) and
copy Blat.exe to a folder in the path. The other files inside
Blat194.zip can be discarded.
FS
On 5/10/05, Frank E Harrell Jr <f.harrell at vanderbilt.edu> wrote:
> Fernando Saldanha wrote:
> > Is there a way to have an R program send an email?
> >
> > Something like this:
> >
> > address <- 'abc at d.com'
> > text <- 'This is the email body'
> > send.email(address, text)
> >
> > Thanks.
> >
> > FS
> >
> > ______________________________________________
> > R-help at stat.math.ethz.ch mailing list
> > https://stat.ethz.ch/mailman/listinfo/r-help
> > PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
> >
>
> Under Linux/Unix you can use code such as the following. This handles
> kmail and mail.
>
> if(mailer=='kmail') {
> tf <- tempfile()
> cat(cmd, file=tf)
> to <- paste('"', paste(to, collapse=','), '"', sep='')
> if(length(cc)) cc <- paste(' -c "', paste(cc,
> collapse=','),'"',sep='')
> if(length(bcc)) bcc <- paste(' -b "', paste(bcc,
> collapse=','),'"',sep='')
> } else {
> to <- paste(to, collapse=' ')
> if(length(cc)) cc <- paste(paste(' -c', cc), collapse='')
> if(length(bcc)) bcc <- paste(paste(' -b', bcc),collapse='')
> }
> cmd <- if(mailer=='kmail') paste('kmail -s "', title, '"', cc,
> bcc, ' --msg ', tf, ' ', to, sep='') else
> paste('echo -e "', cmd, '" | mail -s "',
> title, ' Reports"', cc, bcc, ' ', to, sep='')
> system(cmd)
>
> --
> Frank E Harrell Jr Professor and Chair School of Medicine
> Department of Biostatistics Vanderbilt University
>
More information about the R-help
mailing list