blockaves: Block Average Calculator

In accelerometry: Functions for Processing Minute-to-Minute Accelerometer Data

Description

This function returns averages for non-overlapping segments of data.

Usage

blockaves(x, window, skipchecks = FALSE)

Arguments

x	Input vector.
window	Window length.
skipchecks	If TRUE, function skips error checking code and runs slightly faster.

Value

Vector of length floor(length(x) / window)

Note

If length(x) is not an exact multiple of window, the average for the last partial segment of data is dropped.

Some additional information on the package accelerometry and its functions can be found on the author's website, https://sites.google.com/site/danevandomelen/

Author(s)

Dane R. Van Domelen

References

Acknowledgment: This material is based upon work supported by the National Science Foundation Graduate Research Fellowship under Grant No. DGE-0940903.

See Also

movingaves

Examples

# Load in sample data frame
data(unidata)

# Get data from ID number 21005, Saturday only
counts.saturday <- 
   unidata[unidata[, "seqn"] == 21005 & unidata[, "paxday"] == 7, "paxinten"]

# Calculate and plot hourly count averages
hourly.averages <- blockaves(x = counts.saturday, window = 60)
plot(hourly.averages)

accelerometry documentation built on May 2, 2019, 5:23 p.m.