Fourier transform of bioturbation and sediment slice thickness filter.
Usage
TF.f_bs(nu, tau_b, tau_s)
Arguments
- nu
frequency
- tau_b
timescale of bioturbation (bioturbation depth / sedimentation
rate) (L/sr)
- tau_s
sediment slice thickness in years (layer.width / sedimentation
rate)
Examples
nu = seq(1/10000, 1/50, 1/10000)
tf <- TF.f_bs(nu = nu, tau_b = 1000*10/50, tau_s = 1000*1/50)
plot(nu, abs(tf)^2, type = "l", log = "xy")
