语言提示错误为数学函数中用了非数值参数，想问哪错了，代码如下

for(i in 1:ncol(S1)){ for(j in 1:16){ for(l in 2:3){ if(RZ1[j,l+3*(i-1)] > S[i] & RZ1[j,l+3*(i-1)]>S[i]){ RZ1[j,l+3*(i-1)]='A' } else if(RZ1[j,l+3*(i-1)] > S[i] & abs(RZ1[j,l+3*(i-1)-1]) <= S[i]){ RZ1[j,l+3*(i-1)]='D' } else if(RZ1[j,l+3*(i-1)] > S[i] & RZ1[j,l+3*(i-1)-1]< -S[i]){ RZ1[j,l+3*(i-1)]='G' } else if(abs(RZ1[j,l+3*(i-1)]) < S[i] & RZ1[j,l+3*(i-1)-1] > S[i]){ RZ1[j,l+3*(i-1)]='B' } else if(abs(RZ1[j,l+3*(i-1)]) <= S[i] & abs(RZ1[j,l+3*(i-1)-1]) <= S[i]){ RZ1[j,l+3*(i-1)]='E' } else if(abs(RZ1[j,l+3*(i-1)]) <= S[i] & RZ1[j,l+3*(i-1)-1] < -S[i]){ RZ1[j,l+3*(i-1)]='H' } else if(RZ1[j,l+3*(i-1)] < -S[i] & RZ1[j,l+3*(i-1)-1] > S[i]){ RZ1[j,l+3*(i-1)]='C' } else if(abs(RZ1[j,l+3*(i-1)]) <= S[i] & RZ1[j,l+3*(i-1)] < -S[i]){ RZ1[j,l+3*(i-1)]='F' } else if(RZ1[j,l+3*(i-1)] < -S[i] & RZ1[j,l+3*(i-1)-1] > S[i]){ RZ1[j,l+3*(i-1)]='I' } } }}