一个蛇精病的R语言包，每天给你一个花式自动赞~

欢迎关注天善智能 hellobi.com，我们是专注于商业智能BI，大数据，数据分析领域的垂直社区，学习、问答、求职，一站式搞定！

天善学院svip包含Excel BI、Python爬虫案例、Python机器学习、Python数据科学家、大数据、数据分析报告、数据分析师体系、深度学习、R语言案例10套课程火爆报名中，全场五折购，欢迎大家关注 www.hellobi.com/svip

最近浩彬老撕发现了一个会让人中毒的R语言包，

因为这个R包真的好有（she）腔（jing）调（bing）！

这个R包的名字叫做praise()，

它的功能就是赞你~赞你~赞你~

你问还有其他功能吗？

难道还不够吗？！你想想，一个每次都能变着花样称赞你的R包难道还不够吗？！

简直比男票女票还要称职！

现在，每当浩彬老撕打开R的时候，界面是这样的：

具体实现：

1.环境要求：

（1）https://cran.r-project.org/上下载对应系统及版本的R软件；

（2）此次用到的包为“praise”，因为在github上，所以我们需要先安装“devtools”，再安装“praise”，代码如下：

install.packages('devtools')

devtools::install_github("gaborcsardi/praise")

2.实现过程：

2.1 直接“赞”

library(praise) #加载praise

praise()#称赞一下

2.2 自定义格式赞praise不仅仅支持预设格式，还能根据需求自己设定内容：

praise("${EXCLAMATION}! You have done this ${adverb_manner}!")

其中 ${EXCLAMATION} 以及 ${adverb_manner 你可以理解为包中的词库，分别表示感叹和情态，每个词库里面都含有数量不等的用于称赞你的词语

具体词库见可通过names()查看：

names(praise_parts)

"adjective" "adverb" "adverb_manner" "created" "creating" "exclamation" "rpackage" "smiley"

2.3 设定为打开程序，花式自动赞

没错，就是文章开头图片所示，打开R，自动赞~

R语言当中，我们是可以自定义我们的启动环境。

R在启动时，会到R_Home\etc目录下找Rprofile.site文件进行加载（其中R_Home指的是我们R的安装路径，例如浩彬老撕的目录：D:\Program Files\R\R-3.3.1\etc）。

在，这个文件里，设置的内容包括默认编辑器，CRAN镜像选取，自动加载包等等，要实现我们的花式自动赞，只需要打开Rprofile.site文件，在最后加上如下代码：

#启动鼓励2

.First <- function(){

library(praise)

cat(praise("${EXCLAMATION}! ${EXCLAMATION}! Haobin,you have done this ${adverb_manner}!"),"\n",praise(),"\n",praise(),"\n",date(),"\n")

当然，这只是浩彬老撕的格式了，大家可以根据“被赞”的实际需要进行修改~

近期热门文章精选：

1.数据人也要懂的“装逼利器”，数据驱动下的“增长黑客”

2.浩彬老撕奇妙实验室第一弹：炸裂三观的原汁机

3.R的极客理想：R语言知识体系概览

4.菜鸟数据岛采访：数据分析工作的一些思考

浩彬老撕除了原创文章外，也欢迎各路大神投稿！

重在实战！十五大案例，开启R语言实战之门金钥匙

本文作者：天善智能社区专家浩彬老撕

原文链接：https://ask.hellobi.com/blog/wetalkdata/4092