Стандартизация размера выборки для переоценки Fst
Я новичок в R, поэтому, пожалуйста, будьте терпеливы.
У меня есть 4 популяции одного вида (поп в 1 столбце) с разными размерами выборки. Проведя анализ гаплотипов mitDNA (гап в другом столбце) для каждого индивидуума (каждой строки), теперь мне нужно стандартизировать размер выборки для всех популяций и оценить FST, Я полагаю, что это может быть просто сделано с помощью некоторого метода повторной выборки с дубликатами, чтобы получить случайную подвыборку в совокупностях, но я не уверен, каков правильный способ сделать это.
Кроме того, я никогда не оценивал Fst в R. Есть ли способ получить выходные данные в таблице, аналогичной приведенной ниже? Или же непосредственно применить результаты подвыборки в пакете в R, который может оценить Fst после этой процедуры?
df <- read.table(text="pop hap
1 A
1 A
1 B
1 B
1 B
1 C
1 D
2 F
2 F
2 A
2 A
2 B
2 E
3 A
3 A
3 B
3 D
4 A
4 A
4 A
4 B
4 B", header=TRUE)
Надеюсь, я ясно дал понять.
Заранее большое спасибо.