pub unsafe extern "C" fn R_orderVector1( indx: *mut c_int, n: c_int, x: SEXP, nalast: Rboolean, decreasing: Rboolean, )
C version of R’s indx <- order(x, na.last, decreasing) :