# Attach packages
library(xpectr)
if (FALSE) {
df <- data.frame('a' = c(1, 2, 3), 'b' = c('t', 'y', 'u'),
stringsAsFactors = FALSE)
tests <- gxs_selection("df", out = "return")
for_insertion <- prepare_insertion(tests)
for_insertion
rstudioapi::insertText(for_insertion)
}
Run the code above in your browser using DataLab