Added function to calculate allele freq spectrum

calculate afw- new function