Resample 3-axial input signal to a specific sampling rate

Usage

acti_resample(data, sample_rate, method = "linear", ...)

acti_resample_to_time(data, times, method = "linear", ...)

Arguments

data: A data.frame with a column for time in POSIXct (usually time), and X, Y, Z
sample_rate: sampling frequency, coercible to an integer. This is the sampling rate you're sampling the data into.
method: method for interpolation. Options are "linear"/"constant", which uses stats::approx, or one of "fmm", "periodic", "natural", "monoH.FC", "hyman", which uses stats::spline
...: additional arguments to pass to stats::approx() or stats::spline
times: a vector of POSIXct date/time values to interpolate the data to

Value

A data.frame/tibble of time and X, Y, Z.

Examples

old = options(digits.secs = 3)
x = acti_raw_data
res = acti_resample(data = x, sample_rate = 80)
res = acti_resample(data = x, sample_rate = 100)
res = acti_resample(data = x, sample_rate = 1)
res = acti_resample_to_time(
  data = x,
  times = lubridate::floor_date(x$time, unit = "1 sec"),
)
res_nat = acti_resample_to_time(
  data = x,
  times = lubridate::floor_date(x$time, unit = "1 sec"),
  method = "natural"
)
options(old)