diversity.sfs function

diversity.sfs