### r代码来自Vignette Source'fst-Vignette.rnw'############################################################### ###代码块数字1：lib ############################################################################################################################FST（SNPS.10，主题。Support$ stratum，pairwise = true）加权。表示（f1 $ fst，f1，f1 $重量）########################################################################################支持$ stratum，pairwise = false）加权。均值（f2 $ fst，f2 $权重）############################################################## ###代码块编号4：groupsize #########################################################