# Create a data.frame containing distances of animals detected
# along 4 transects.
dat <- data.frame(transect=gl(4,5, labels=letters[1:4]), distance=rpois(20, 10))
dat
# Look at your transect names.
levels(dat$transect)
# Suppose that you also surveyed a transect named "e" where no animals were
# detected. You must add it to the levels of dat$transect
levels(dat$transect) <- c(levels(dat$transect), "e")
levels(dat$transect)
# Distance cut points defining distance intervals
cp <- c(6, 8, 10, 12, 14, 18)
# Create formated response data.frame
yDat <- formatDistData(dat, "distance", "transect", cp)
yDat
# Now you could merge yDat with transect-level covariates and
# then use unmarkedFrameDS to prepare data for distsamp}
Run the code above in your browser using DataLab