-
Notifications
You must be signed in to change notification settings - Fork 28
Open
Description
I notice this library has quite a few grepl calls. Not sure if you're aware but using perl is often considerably faster ...
example
> vec <- c(" ", " ", "asdas", "dsdsd", letters, LETTERS)
> vec <- sample(vec, 10000000, replace = T)
> system.time(grepl("^\\s*$", vec))
user system elapsed
1.38 0.00 1.39
> system.time(grepl("^\\s*$", vec, perl = T))
user system elapsed
0.72 0.03 0.75
> system.time(grepl("^\\s*$", vec))
user system elapsed
1.32 0.00 1.33
> system.time(grepl("^\\s*$", vec, perl = T))
user system elapsed
0.69 0.00 0.69
Metadata
Metadata
Assignees
Labels
No labels