## load demonstration data
data(rawdata) ## trapXY, captXY
## construct a traps object from raw trap data
temptrap <- read.traps(data = trapXY, detector = 'single')
plot(temptrap)
## construct a capthist object
tempcapt <- make.capthist(captXY, temptrap, fmt='XY')
plot(tempcapt, tracks = TRUE)
## fmt='trapID' is usually simpler
Run the code above in your browser using DataLab