Dplyr数据处理：图解版

实现分组数据的提取前n行

library(dplyr)
n_top <- function(data1,n){
  newdata <- data1 %>% group_by(Group) %>% slice_min(p.adjust,n=n)
  return(newdata)
}
n_top(HS_GO,15) #提取数据框的前15行

自定义函数n_top，先根据Group列分组， 然后slice_min指定根据p.ajust列取最小的前15个。 slice_head(n=10) 是直接提取前10行。 slice_sample(n=15) 是随机提取15行。 slice_max(Count,n=15) 是提取Count的最大的前15个 先分组，再提取，即可实现根据分组提取。