Mz(abs)=(((∑^i)(I(Subscript[R, i])*(Subscript[M, (Subscript[Abs, i])]^2)))/((∑^i)(I(Subscript[R, i])*(Subscript[M, (Subscript[Abs, i])])))).