(R=c((∑ (Subscript[N, ipb])(Subscript[X, ipb]^′))/N)(6))