add document and R code for calculating genetic correlation