if (FALSE) {
# Basic usage with stations as sampling units
result <- speciesAccum(
CTtable = cams,
recordTable = recs,
speciesCol = "Species",
recordDateTimeCol = "DateTime",
setupCol = "Setup_date",
stationCol = "Station",
q = 0,
x_unit = "station"
)
# Plot results
ggiNEXT(result, type = 1) # Sample-size-based R/E curve
ggiNEXT(result, type = 2) # Sample completeness curve
ggiNEXT(result, type = 3) # Coverage-based R/E curve
# With assemblage grouping and days as sampling units
result_by_assemblage <- speciesAccum(
CTtable = cams,
recordTable = recs,
speciesCol = "Species",
recordDateTimeCol = "DateTime",
setupCol = "Setup_date",
stationCol = "Station",
assemblageCol = "Season",
q = 0,
x_unit = "day"
)
}
Run the code above in your browser using DataLab