Displaying 1 result from an estimated 1 matches for "not_matrix".
Did you mean:
dotmatrix
2010 Aug 26
2
Speeding up transpose
...SET_VECTOR_ELT(r, i, VECTOR_ELT(a,j));
}
break;
case RAWSXP:
for (i = 0, j = 0; i<len; i += 1, j += nrow) {
if (j>=len) j -= (len-1);
RAW(r)[i] = RAW(a)[j];
}
break;
default:
UNPROTECT(1);
goto not_matrix;
}