blr_rsq_count function

Count R2