(Subscript[R, q]^i)=(((∑_(j=1)^l)(Subscript[q, j]))/l)