knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)
library(navr)
library(ggplot2)
obj <- navr_object

Preprocessing

We can prepare necessary columns (time diffs, speeds, distances) with a single function.

colnames(obj$data)
obj <- prepare_navr(obj)
colnames(obj$data)

Removing too large speeds/teleports

#this function picks unreal speeds
i_speeds <- pick_unreal_speeds(obj, 3, "std")

#this function removes given speed AND distance measurements and recalculates total distance
obj <- remove_unreal_speeds(obj, indices = i_speeds, total_recalculate = T)


hejtmy/navr documentation built on March 3, 2023, 5:24 p.m.