powered by
fstToNm(fst, ploidy)
fst <- seq(0.001, 0.2, length.out = 100) Nm <- fstToNm(fst, 2) plot(fst, Nm, type = "l")
Run the code above in your browser using DataLab