1生成随机数：
产生随机数有两个函数，他们是runif(),rnorm()
runif(10,min=0,max=1)#产生10个最小值为0，最大值为1的随机数
ronrm(10,mean=0,sd=1)#产生10个平均值为0，方差为1的随机数
若需要固定，可用set.seed()函数。
2查找某个特定字符所在的行：
which(rd$order=="Primates",arr.ind=TRUE)
3 dplyr函数：Select和filter：
control<-filter(data,Diet=="chow")
select(control,Bodyweight)
unlist(control):
OR:control<-filter(data,Diet=="chow") %>% select(Bodyweight) %>% unlist
