Pairwise Fst and G'st in R

Is anyone aware of functions(s) packages in R: thant caclulate pairwise 
Fst and or G'st between all populations in a dataset?

cheers

Nevil Amos