Find and replace in files across a directory
Usage
findAndReplace(
pattern,
replacement,
filePattern = "\\.(r|R)$",
dir = getwd(),
recursive = FALSE
)Examples
## > unlink("testdata", recursive = TRUE)
## > dir.create(file.path("testdata", "subdir"), recursive = TRUE)
## > writeLines(
## > text = "print(\"foo\")",
## > con = file.path("testdata", "aaa.R"),
## > )
## > writeLines(
## > text = "print(\"foo\")",
## > con = file.path("testdata", "subdir", "bbb.R"),
## > )
## > out <- findAndReplace(
## > pattern = "foo",
## > replacement = "bar",
## > dir = "testdata",
## > recursive = TRUE
## > )
## > print(out)
## > print(readLines(out[[1L]]))
## > unlink("testdata", recursive = TRUE)