【R图秀-11】情人节快乐！

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

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

figure1.png
画出来的图是这样的：
figure2.png
看上去有点简陋，实在是拿不出手，所以我决定在此基础上进行几点改进：

1. 给爱心填上红色
2. 画两个爱心
3. 用金色的丘比特之箭将两个爱心连在一起
4. 把对Ta说的话写在爱心上方

下面我们就一起来实现这个2.0版本的情人节卡片：

1. 准备工作。准备好填充爱心的颜色和画第一个爱心所需的x和y变量

   
   figure3.png

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

   
   figure4.png
   

   效果如下：

   
   figure5.png

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

   
   figure6.png
   

   效果如下：

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

   效果如下：

   
   figure9.png

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

   
   figure10.png
   

   效果如下：

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

   效果如下：

   
   figure13.png

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

   
   figure14.png
   

   最终的效果如下：

   
   figure15.png

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

figure16.png

最后祝大家情人节快乐！请继续关注【R图秀】！

qrcode.jpg