Expected.R2 function

Expected value of the squared multiple correlation coefficient