> sample(c(1:10),8) # 对向量取样，默认是不放回抽样，replace=FALSE
> sample(c(1:10),8,replace=TRUE) # 放回抽样
对数据框不放回抽行
dataframe[sample(nrow(dataframe), 10), ] #dataframe是数据框，10是行数。
如yuangong_male_600<-yuangong_male[sample(nrow(yuangong_male),600),] # 取600行
> sample(c(1:10),8) # 对向量取样，默认是不放回抽样，replace=FALSE
> sample(c(1:10),8,replace=TRUE) # 放回抽样
对数据框不放回抽行
dataframe[sample(nrow(dataframe), 10), ] #dataframe是数据框，10是行数。
如yuangong_male_600<-yuangong_male[sample(nrow(yuangong_male),600),] # 取600行
本文来自博客园，作者：BioinformaticsMaster，转载请注明原文链接：https://www.cnblogs.com/koujiaodahan/p/15755430.html