removeRing {xRing}

Remove Tree-Ring Border(s)

Description

Remove the closest tree-ring border

Usage

removeRing(object, x, series = NULL)

Arguments

object

an object of class "xRing" or "xRingList"

x

the position to delete the closest tree-ring border

series

the name of the series to be changed when the object is a "xRingList", by default is NULL

Value

an object of class "xRing" or "xRingList" without the tree-ring border at the position x for the series given by series argument

Examples

data(PaPiRaw)
data(PaPiSpan)
PaPi <- detectRings(PaPiRaw, PaPiSpan)
plotRings(PaPi$AFO1001a)
abline(v = 60, lty = 2, col = 2)
PaPi$AFO1001a <- removeRing(PaPi$AFO1001a, x = 60)
# PaPi$AFO1001a <- removeRing(PaPi$AFO1001a, x = locator(1)$x)
plotRings(PaPi$AFO1001a)