如果想从一堆数据集中随机抽出一个数，用sample函数就能实现，代码展示如下：
forehead<-c(249,189,128,111,184,233,313,120,151,196,135,157,145,218) sample(forehead,1) #1表示从forehead数据集中随机抽出一个数
类似的，从数据集随机抽出两个数或者三个数则将1改为2或者3即可：
sample(forehead,2) sample(forehead,3)
结果如下所示：
原文：http://www.cnblogs.com/chenwenyan/p/7700952.html