摘要： library(tidyverse) fst = choose.files() fst1 = read.table(fst, header = T) head(fst1) fst2 = fst1 %>% select(1,2,3,6) %>% top_frac(0.05,wt = MEAN_FST) 阅读全文