R/global_vars.R

In bhelsel/agcounts: Calculate 'ActiGraph' Counts from Accelerometer Data

# Copyright © 2022 University of Kansas. All rights reserved.

if(getRversion() >= "2.15.1")  utils::globalVariables(c(
  ".", "Axis1", "Axis2", "Axis3", "Vector.Magnitude", "time"
))

.coefficients = list(

  input_coefficients = c(
    "-0.009341062898525",
    "-0.025470289659360",
    "-0.004235264826105",
    "0.044152415456420",
    "0.036493718347760",
    "-0.011893961934740",
    "-0.022917390623150",
    "-0.006788163862310",
    "0.000000000000000"
  ),

  output_coefficients = c(
    "1.00000000000000000000",
    "-3.63367395910957000000",
    "5.03689812757486000000",
    "-3.09612247819666000000",
    "0.50620507633883000000",
    "0.32421701566682000000",
    "-0.15685485875559000000",
    "0.01949130205890000000",
    "0.00000000000000000000"
  )

)