# NOT RUN {
## Get data with radial measurements
data(SMBassWB)
headtail(SMBassWB)
## convert radial measurements to increments
SMBi1 <- gConvert(SMBassWB,in.pre="anu",out.type="inc")
headtail(SMBi1)
## add the radius-at-capture measurement
SMBi1a <- addRadCap(SMBi1,in.pre="inc",var.name="radcap2")
headtail(SMBi1a)
# }
Run the code above in your browser using DataLab