R script to compute Elston index
R script to compute Pesek-Baker index