R软件每日自动发送邮件(mailR包)

文章所用到的代码主要来源于网络,经过了我的稍许调整,此外文章提到了我自己运行时碰到一些问题及相应解决办法。

一、下载mailR包

利用mailR包,可以将R程序的结果及附件发送给他人。
首先需要下载mailR包。

install.packages("mailR")

注意,mailR需要在JAVA环境下运行,因此请先确保电脑里安装了jdk。
如果安装了jdk和mailR包后,library(mailR)依旧显示“Error: ‘rJava’程辑包或名字空间载入失败”,这是环境变量的设置上的原因。一般的解决办法是重新设置环境变量,网上相关教程有很多。但是我把jdk直接安装在了R同一目录下也同样解决了调用rJava失败这个问题(譬如我的安装位置是C:\R\R-3.2.5\bin\x64)。

调用mailR包应该还需要下载stringr包等,一般我们在下载mailR包时R软件就会直接帮我们自动下载,不需要我们自己安装。但如果有包无法安装或者下载速度非常慢,建议换个镜像,国外镜像经常会不稳定,建议换成国内的地址(Rstdio点击Tools,选择Global Option,在出现的对话框中选择Packages,点击change,将镜像换到清华大学等国内的就好)。如果还是下载不了R包的话,可以自己去官网(https://mirrors.tuna.tsinghua.edu.cn/CRAN/)手动下载,把下载下来的包解压到library文件夹即可。

接下去就可以在Rstdio里运行下面的代码,从而通过R直接发送邮件。

二、发送邮件

首先,自定义一个函数mysendmail。修改标出的两个地方(发送邮箱和邮箱密码),其他部分一般不需要修改。


library(mailR)

mysendmail =function(wd,to,cc,subject,msg,files=array()){

   if(is.na(files)[1]{

      attach.files <- NULL

   }else{

      attach.files <-paste(wd,files,sep='/')

   }

   from = "XXXX@XX.com"   #这里输入发送者的邮箱

   send.mail(from = from,

             to = to,

             cc = cc,

             subject = subject,

             body = msg,

             smtp = list(host.name = "smtp.exmail.qq.com", port =465,user.name=from,passwd = "XXXXXXXX", ssl =TRUE),
                                                                                  #passwd = “ “这里输入发送邮箱的密码
             authenticate = TRUE,

             send = TRUE,

             attach.files = attach.files,

             encoding = "utf-8")

}

接下去通过下面的代码调用上面定义好的函数。
例如我需要发送一封邮件给XXXXXX@163.com,邮件主题为Test,正文为“This is a test!",附件的本地地址为C:\Users\Administrator\Desktop\Test.csv,同时将该邮件抄送给YYYY@qq.com。则相应的代码如下:

result <- "Test.csv"
receiptant <- c('XXXXXX@163.com')
message <- c("This is a test!")
mysendmail(wd = "C:/Users/Administrator/Desktop", 
           subject = "Test", msg = message, to = receipant, cc = c('YYYY@qq.com'), files = result)

如果代码运行报错,先查看一下邮箱地址有没有写错。

三、自动运行R程序

有时候,我们需要程序每天定时运行处理数据并将结果发送到邮箱。
通过打开“控制面板”——“管理工具”——“任务计划程序”——“创建基本任务”实现这一目的。
按照向导提示的步骤进行操作,如果希望每天定时发送邮件,则在触发器这一步中选择“每天”;如果希望每周特定时间(如周一到周五晚上21:00运行R脚本)则选择“每周”。
注意在操作这一步时应选择“启动程序(T)”,在“程序或脚本”一栏中输入Rscript.exe的地址(如C:\R\R-3.2.5\bin\x64\Rscript.exe),在“添加参数(可选)”中填入要运行的R脚本地址(如C:\Users\Administrator\Desktop\Rtest.R)。
或者简单粗暴地直接在“程序或脚本”一栏中填入Rscript和R脚本两者的地址(如C:\R\R-3.2.5\bin\x64\Rscript.exe C:\Users\Administrator\Desktop\Rtest.R),在创建完成时电脑会直接将R脚本地址转移到“可选参数”栏中。


图片.启动程序

如果上述R软件自动发送邮件的步骤还有哪里表述不清楚的,欢迎和我交流!

最后编辑于
©著作权归作者所有,转载或内容合作请联系作者
平台声明:文章内容(如有图片或视频亦包括在内)由作者上传并发布,文章内容仅代表作者本人观点,简书系信息发布平台,仅提供信息存储服务。

推荐阅读更多精彩内容

  • Spring Cloud为开发人员提供了快速构建分布式系统中一些常见模式的工具(例如配置管理,服务发现,断路器,智...
    卡卡罗2017阅读 135,083评论 19 139
  • Python 面向对象Python从设计之初就已经是一门面向对象的语言,正因为如此,在Python中创建一个类和对...
    顺毛阅读 4,257评论 4 16
  • feisky云计算、虚拟化与Linux技术笔记posts - 1014, comments - 298, trac...
    不排版阅读 3,939评论 0 5
  • 今天。放学回家的时候,我写完了作业,我就玩儿了会儿。我开始玩儿的是小鱼。我拿的是妈妈用矿泉水瓶子剪开的底部,想给小...
    荣沛鋡阅读 283评论 1 1
  • 2018.7.13 P185 晴 上午:试听一节课 时间比较长,就过12点了 中午:孩儿还是发烧,睡...
    月出孤舟寒阅读 385评论 2 1