Displaying 2 results from an estimated 2 matches for "reycl".
Did you mean:
recyl
2017 Oct 03
0
Revert to R 3.2.x code of logicalSubscript in subscript.c?
...-mtune=native.
I got the following results with R-3.4.2 (with R_ENABLE_JIT=0, which
is slightly faster than using the JIT compiler):
R-3.4.2, LARGE VECTORS:
> N <- 1e8; R <- 5
> #N <- 1e5; R <- 1000
>
> x <- numeric(N)
> i <- rep(FALSE, length(x))# no reycling
> system.time(for (r in 1:R) a <- x[i])
user system elapsed
0.296 0.000 0.297
> i <- FALSE# recycling
> system.time(for (r in 1:R) a <- x[i])
user system elapsed
0.416 0.000 0.418
>
> x <- numeric(N)
> i <- rep(TRUE, l...
2017 Oct 01
0
Revert to R 3.2.x code of logicalSubscript in subscript.c?
...-type . I presents two extreme cases, each with no-recycling and recycling versions that convert to the same positive indices. Difference between the two versions can be attributed to function 'logicalSubscript'.
Example 1: select none
x <- numeric(1e8)
i <- rep(FALSE, length(x))# no reycling
system.time(x[i])
system.time(x[i])
i <- FALSE# recycling
system.time(x[i])
system.time(x[i])
Output:
?? user? system elapsed
? 0.083?? 0.000?? 0.083
?? user? system elapsed
? 0.085?? 0.000?? 0.085
?? user? system elapsed
? 0.144?? 0.000?? 0.144
?? user? system elapsed
? 0.143?? 0.000...