Speed up findVarlist() with c(x, recursive=TRUE)