ACWR (version 0.1.0)

RAU: Rolling Average Uncoupled

Description

Rolling Average Uncoupled

Usage

RAU(TL, weeks, training_dates)

Arguments

TL

training load

weeks

training weeks

training_dates

training dates

Value

This function returns the following variables:

• RAU_chronic: RAU - chronic training load.

• RAU_acute: RAU - acute training load.

• RAU_ACWR: RAU - Acute-Chronic Workload Ratio.

Examples

# NOT RUN {
# }
# NOT RUN {
# Get old working directory
oldwd <- getwd()

# Set temporary directory
setwd(tempdir())

# Read db
data("training_load", package = "ACWR")

# Convert to data.frame
training_load <- data.frame(training_load)

# Select the first subject
training_load_1 <- training_load[training_load[["ID"]] == 1,  ]

# Calculate ACWR
result_RAU <- RAU(TL = training_load_1$TL,
                   weeks = training_load_1$Week,
                   training_dates = training_load_1$Training_Date)

# set user working directory
setwd(oldwd)
# }
# NOT RUN {
# }