R/findPeaks.R
In xRing: Identify and Measure Tree Rings on X-Ray Micro-Density Profiles

findPeaks <- function(x) {
  which(diff(sign(diff(x, na.pad = FALSE)), na.pad = FALSE) < 0) + 1
}

Any scripts or data that you put into this service are public.

xRing documentation built on April 22, 2022, 5:05 p.m.

Note that we can't provide technical support on individual packages. You should contact the package authors for that.

Try the xRing package in your browser