嗯,又一次唆使R不务正业,罪过罪过。
下面是一个地址,
http://www.box.net/shared/j13dv1z345,地址中是一个文件,文件中是若干R的函数,反正都丢到控制台里运行就行了。然后是主函数,
Rmine(width=10,height=10,mines=20,text.cex=2,cheat=FALSE)
前三个参数应该不用解释了;text.cex是数字的相对大小,对应于plot()里面的cex,如果你调了一个很大的width和height,可能需要把这个参数调小一点;至于cheat参数嘛……
嫌麻烦就直接Rmine(),反正都有默认值的。
由于个人能力实在有限,程序非常简陋,而且天气热了可能bug也多了。另外建议单开一个R Console来运行,因为鼠标每点一下,控制台中就要回车一次,非常不方便。