library("qdapRegex")
(myregex <- grab("@rm_time2"))
out <- as.regexr(myregex)
out
summary(out)
comments(out)
subs(out)
test(out)
get_construct(out)
## On Windows copy to clipboard
get_construct(out, file="clipboard")
## No names & comments behind sub-expressions
myregex2 <- "(\\s*[a-z]+)([^)]+\\))"
get_construct(as.regexr(myregex2, names=FALSE))
get_construct(as.regexr(myregex2, names=FALSE, names.above = TRUE,
comments.below = TRUE))
Run the code above in your browser using DataLab