search for: extractdroparg

Displaying 2 results from an estimated 2 matches for "extractdroparg".

2006 Sep 08
1
R drop behavior -- set as option in later version?
..., but it seems like this would only require changes to a few lines of code. In main/subset.c, surrounding line 505, there is the following code: ------------ /* Extracts the drop argument, if present, from the argument list. The object being subsetted must be the first argument. */ static void ExtractDropArg(SEXP el, int *drop) { SEXP last = el; for (el = CDR(el); el != R_NilValue; el = CDR(el)) { if(TAG(el) == R_DropSymbol) { *drop = asLogical(CAR(el)); if (*drop == NA_LOGICAL) *drop = 1; SETCDR(last, CDR(el)); } else last = el; }...
2006 Sep 08
1
R drop behavior -- set as option in later version?
..., but it seems like this would only require changes to a few lines of code. In main/subset.c, surrounding line 505, there is the following code: ------------ /* Extracts the drop argument, if present, from the argument list. The object being subsetted must be the first argument. */ static void ExtractDropArg(SEXP el, int *drop) { SEXP last = el; for (el = CDR(el); el != R_NilValue; el = CDR(el)) { if(TAG(el) == R_DropSymbol) { *drop = asLogical(CAR(el)); if (*drop == NA_LOGICAL) *drop = 1; SETCDR(last, CDR(el)); } else last = el; }...