fit_epsilon: fit epsilon from block of ADV data
In USGS-R/GDopp: processing of ADV data

Description Usage Arguments Details Value References Examples

solves for epsilon from ADV data in the inertial subrange assuming Zappa et al. 2003

1 2	fit_epsilon(chunk.adv, freq = 32, lower = 20, upper = 80, diagnostic = FALSE)

`chunk.adv`	a data.frame created with load.ADV, with the window.idx column
`freq`	a numeric, in Hz, that represents the input data
`lower`	a numeric, in Hz, that represents the lower bounds for range of epsilon calculation
`upper`	a numeric, in Hz, that represents the upper bounds for range of epsilon calculation
`diagnostic`	a boolean for diagnostic plot

a GDopp function for splitting sensor data into temporal segments.

a single value of epsilon estimating from the temporal block given.

Zappa, Christopher J., Peter A. Raymond, Eugene A. Terray, and Wade R. McGillis. "Variation in surface turbulence and the gas transfer velocity over a tidal cycle in a macro-tidal estuary." Estuaries 26, no. 6 (2003): 1401-1415.

## Not run: 
folder.nm <- system.file('extdata', package = 'GDopp')
file.nm <- "ALQ102.dat"
data.adv <- load_adv(file.nm=file.nm, folder.nm =folder.nm)
window.adv <- window_adv(data.adv,freq=32,window.mins=10)
fit_epsilon(window.adv[window.adv$window.idx==7, ],freq=32)
fit_epsilon(window.adv[window.adv$window.idx==7, ],freq=32, diagnostic = TRUE)

## End(Not run)