library(pathviewr)
## Import the example Motive data included in the package
motive_data <-
read_motive_csv(system.file("extdata", "pathviewr_motive_example_data.csv",
package = 'pathviewr'))
motive_full <-
motive_data %>%
clean_viewr(desired_percent = 50,
max_frame_gap = "autodetect",
span = 0.95)
## Alternatively, used the import_and_clean_viewr()
## function to combine these steps
motive_import_and_clean <-
import_and_clean_viewr(
file_name = system.file("extdata", "pathviewr_motive_example_data.csv",
package = 'pathviewr'),
desired_percent = 50,
max_frame_gap = "autodetect",
span = 0.95
)
Run the code above in your browser using DataLab