R=(∑_(i=1)^n)((Subscript[p, i])(((Subscript[α, i])(((Subscript[x, i])/(L*S))))^(Subscript[b, i]))(∏_(j=1≠i)^n)(((((Subscript[x, j])/(L*S))))^(Subscript[g, ij]))),