# Define start and end dates for sampling seasons.
seasons <- data.frame(
start = c(
as.Date("2017-01-01"),
as.Date("2018-01-01"),
as.Date("2019-01-01")
),
end = c(
as.Date("2017-12-31"),
as.Date("2018-12-31"),
as.Date("2019-12-31")
)
)
# Create a dynamics matrix for animal captures.
dyn_matrix(
animal_id = wolf_samples$AnimalRef,
capture_date = wolf_samples$Date,
start_dates = seasons$start,
end_dates = seasons$end
)
Run the code above in your browser using DataLab