R语言|扫雷
今天周末，大家放松下， 继上次推送的画心程序之后，今天再给大家介绍一个好玩的东东。R语言扫雷。这个扫雷程序是别人开发的，不仅仅如此。小编还见过下五子棋的、坦克大战（小编自己写的）的。总之一句话，小编认为兴趣是最好的老师。
以下内容转载自易小蟹说统计
日常的学习工作中，你是否一直把R语言作为统计分析软件，单纯地进行数据的统计分析和绘图？
小蟹君今天就给大家介绍一下R的另外一种玩法咯。
还记得曾经风靡课堂的“扫雷”吗？上电脑课的时候，是不是也悄悄地玩过？不过小蟹君玩游戏从来都是智商有限，但是最近有个新发现，我自己用R语言编“扫雷”、雷我自己埋、再自己扫。哎呀，这个过关的成功率明显突飞猛进呀。好了，废话不多说，带你看R语言编扫雷。友情提醒：别被自己埋的雷炸到哟！~
跟着小蟹君几步走，
第一步，在R编辑器内输入以下代码，并运行
install.packages('fun') #安装”fun”包
library(fun) #调用”fun”包
第二步，在R的编辑器输入代码：windows()。
如下图：
会弹出如下界面
第三步：运行”fun”包中的mine_sweeper函数，如下：
mine_sweeper(width= 10, height = 10, mines = 20,
text.cex = 2, cheat = F, seed =NULL)
刚刚的界面就会变成如下样式：
这个界面是不是很熟悉？
现在，你就可以开始在上面玩扫雷了。
小蟹君先带你玩一把，如下：
于是，小蟹君开外挂了，
这就带你看看扫雷函数中的参数，明白了之后，你就可以顺利过关啦。
Sweep_Mine(width = 10, height = 10, mines = 20, text.cex = 2,
cheat = FALSE, seed = NULL)
width：是整个扫雷界面的横向上有多少个方格。
height：是整个扫雷界面的纵向上有多少个方格。
width* height就是整个扫雷界面共有多少个方格。
mines:是地雷的个数。就是小蟹君想给自己扫几个雷就给自己埋几个。
text.cex:是方格内数字的字体大小。
cheat:是逻辑值，=FALSE
seed:如果设置数字，第一局和第二局雷所在的位置就固定了。更准确来说：如果seed=50，那么从第一列开始数（按照列来数），数到第50个方格，前50个方格，不管游戏的第几局，都是一样。
通过以上对参数的解释，你明白了吧。比如说：你想让自己的雷，少一点，可以让mines参数设置的小一些。如果，你的记忆力很好，你可以赋予seed值（比如seed=50）,让前（按列数）50方格不变。
如果，你想自己百分百过关，小蟹君也可以让你做到，就和刚刚小蟹君一样开外挂，可以设置参数cheat=T.这样就可以把扫雷的整个界面的情况在R控制台上都打印出来了，
以上矩阵中，-1的方格表示该位置有雷，0表示该方格的周围没有雷，2表示，该方格的周围有2个雷，依次类推。
以上就是小蟹君的整个扫雷过程。是不是也想自己埋埋雷，再扫扫试试了？想要几个格子就几个，想埋几个雷就几个，参数自己随心调。
在繁忙的工作中，偶尔休闲一下，打开R，玩玩扫雷。
图片来源于网络，侵删
欢迎关注生信人