step_baro_clark

Clark 1967 solution for calculating barometric efficiency (Algorithm from Batu 1998, pg 76)

Usage

step_baro_clark(
  .rec,
  water_level,
  barometric_pressure,
  lag_space = 1L,
  inverse = FALSE,
  role = "augment",
  ...
)

Arguments

.rec

the R6 recipe object.

water_level

numeric vector of the dependent variable (ie:water level)

barometric_pressure

numeric vector of the independent variable (ie:barometric pressure)

lag_space

integer spacing for lags, useful for higher frequency monitoring

inverse

logical whether the barometric relationship is inverse

role

character - the name of the role

...

additional arguments

Value

barometric efficiency using Clark's method

References

Clark, W.E., 1967. Computing the barometric efficiency of a well. Journal of the Hydraulics Division, 93(4), pp.93-98.

Batu, V., 1998. Aquifer hydraulics: a comprehensive guide to hydrogeologic data analysis. John Wiley & Sons.

See also

Other barometric: step_baro_harmonic(), step_baro_least_squares()

Examples

data(kennel_2020)

clarks <- recipe(wl~., kennel_2020) |>
  step_baro_clark(wl, baro, lag_space = 1) |> # 1 minutes (every minute differences)
  step_baro_clark(wl, baro, lag_space = 60) |> # 60 minutes (hourly differences)
  step_baro_clark(wl, baro, lag_space = 1440) |> # 1440 minutes (daily differences)
  prep() |>
  bake()

clarks$get_step_data("barometric_efficiency")
#> [[1]]
#> [[1]]$be
#> [1] 0.1941766
#> 
#> 
#> [[2]]
#> [[2]]$be
#> [1] 0.4738098
#> 
#> 
#> [[3]]
#> [[3]]$be
#> [1] 0.8453437
#> 
#>