data(Example.transformed)
Example1 <- Example.transformed
allelefreq(Example1)
# This function is included in this package and calculates the
# allelefrequencies as well as the sample sizes
Ht(allelefrequency)
Ht
Run the code above in your browser using DataLab