example_gpx_file <- system.file(
"extdata",
"running_example.gpx.gz",
package = "activatr"
)
example_act_tbl <- parse_gpx(example_gpx_file)
example_act_tbl_with_speed <- mutate_with_speed(example_act_tbl)
example_act_tbl_with_speed
Run the code above in your browser using DataLab