logsmoo {kitagawa}

Logarithmic smoothing with loess

Description

Logarithmic smoothing with loess

Usage

logsmoo(x, y, x.is.log = FALSE, ...)

Arguments

x

numeric; the index series (cannot contain NA)

y

numeric; the series of values associated with x

x.is.log

logical; determines whether the series in x has been log-transformed already. If FALSE then log10 is used.

...

additional parameters (e.g., span) passed to loess.smooth

Value

The result of loess.smooth

References

Barbour, A. J., and D. C. Agnew (2011), Noise levels on Plate Boundary Observatory borehole strainmeters in southern California, Bulletin of the Seismological Society of America, 101(5), 2453-2466, doi: 10.1785/0120110062

See Also

loess.smooth and approxfun

Examples

set.seed(11133)
n <- 101
lx <- seq(-1,1,length.out=n)
y <- rnorm(n) + cumsum(rnorm(n))
plot(lx, y, col='grey')
lines(logsmoo(lx, y, x.is.log=TRUE))