This pair of functions makes it easy to create paired R and test files,
using the convention that the tests for
R/foofy.R should live
tests/testthat/test-foofy.R. You can use them to create new files
from scratch by supplying
name, or if you use RStudio, you can call
to create (or navigate to) the paired file based on the currently open
use_r(name = NULL, open = rlang::is_interactive()) use_test(name = NULL, open = rlang::is_interactive())
Either a name without extension, or
Whether to open the file for interactive editing.
Here are some tips on aligning file names across
in an existing package that did not necessarily follow this convention
This script generates a data frame of
R/ and test files that can help you
identify missed opportunities for pairing:
library(fs) library(tidyverse) bind_rows( tibble( type = "R", path = dir_ls("R/", regexp = "\\.[Rr]$"), name = as.character(path_ext_remove(path_file(path))), ), tibble( type = "test", path = dir_ls("tests/testthat/", regexp = "/test[^/]+\\.[Rr]$"), name = as.character(path_ext_remove(str_remove(path_file(path), "^test[-_]"))), ) ) %>% pivot_wider(names_from = type, values_from = path) %>% print(n = Inf)
rename_files() function can also be helpful.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.