【R图秀】情人节快乐！

作者简介Introduction

傅兴：个人公众号：Rapp

往期回顾

【R图秀-1】12306列车数据可视化

【R图秀-2】社交网络数据可视化（一）

【R图秀-3】——“全球和平指数”可视化

提醒大家：在这个浪漫的情人节里也别忘记练习R编程哦！今天的R图秀就用R来制作一张情人节卡片送给你和你的另一半，愿天下有情人终成眷属！

表达爱意肯定离不开❤️，所以首先要解决的问题是如何用R来画❤️。我在网上找到了一个很简单的方法：https://www.r-bloggers.com/make-a-valentines-heart-with-r/ 
代码如下：

画出来的图是这样的：

看上去有点简陋，实在是拿不出手，所以我决定在此基础上进行几点改进：
1. 给爱心填上红色
2. 画两个爱心
3. 用金色的丘比特之箭将两个爱心连在一起
4. 把对Ta说的话写在爱心上方

下面我们就一起来实现这个2.0版本的情人节卡片：
1. 准备工作。准备好填充爱心的颜色和画第一个爱心所需的x和y变量

2. 为了给爱心填色，我们使用polygon函数取代原来的lines函数：

效果如下：

3. 用同样的方法在右边画第二个爱心

效果如下：

看上去2个爱心连成一片，效果不好，我打算用lines函数给爱心加上边：

效果如下：

4. 用4个arrows函数来画穿过爱心的丘比特之箭：

效果如下：

这支箭看上去是放在爱心上而不是穿过爱心，所以我们需要调整一下画arrows的顺序：

效果如下：

5. 把你对Ta说的话写下来吧：

最终的效果如下：

下面是完整的代码供大家参考：

最后祝大家情人节快乐！！！

　往期精彩内容整理合集　

2017年R语言发展报告（国内）

R语言中文社区历史文章整理（作者篇）

R语言中文社区历史文章整理（类型篇）

公众号后台回复关键字即可学习

回复 R                  R语言快速入门及数据挖掘 
回复 Kaggle案例  Kaggle十大案例精讲（连载中）
回复 文本挖掘      手把手教你做文本挖掘
回复 可视化          R语言可视化在商务场景中的应用 
回复 大数据         大数据系列免费视频教程 
回复 量化投资      张丹教你如何用R语言量化投资 
回复 用户画像      京东大数据，揭秘用户画像
回复 数据挖掘     常用数据挖掘算法原理解释与应用
回复 机器学习     人工智能系列之机器学习与实践
回复 爬虫            R语言爬虫实战案例分享