Calculate a time weighted average concentration

The moving average is built only using the values in the past, so the earliest possible time for the maximum in the time series returned is after one window has passed.

twa(x, window = 21)

# S3 method for one_box
twa(x, window = 21)

Arguments

x	An object of type one_box
window	The size of the moving window

See also

max_twa

Examples

pred <- sawtooth(one_box(10),
  applications = data.frame(time = c(0, 7), amount = c(1, 1)))
max_twa(pred)
#> $max
#>    parent 
#> 0.9537545 
#> 
#> $window_start
#> parent 
#>      0 
#> 
#> $window_end
#> parent 
#>     21 
#>