inst/testpath/file1.R

devtools::load_all()
mutate(iris, x = 3)

originize_selection(pkgs = "dplyr", overwrite = TRUE)
originize_file(file.path("inst", "testpath", "file1.R"),
               pkgs = "dplyr",
               verbose = TRUE,
               ask_before_applying_changes = TRUE,
               use_markers = FALSE)
originize_dir(path = file.path("inst", "testpath"),
              pkgs = "dplyr",
              verbose = TRUE,
              ask_before_applying_changes = TRUE)

iris %>%
  dplyr::filter(Species == "setosa") %>%
  dplyr::filter(Spepal.Length > 3) %>%
  dplyr::filter(TRUE)

last(knj, 1)
myclass$last()
myclass@last()

Try the origin package in your browser

Any scripts or data that you put into this service are public.

origin documentation built on April 3, 2025, 11:03 p.m.