In nfrerebeau/tabula: Analysis and Visualization of Archaeological Count Data

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-",
  out.width = NULL
)
Sys.setlocale("LC_MESSAGES", 'en_GB.UTF-8') # Force locale

tabula

{.pkgdown-devel} {.pkgdown-release} {.pkgdown-release} {.pkgdown-release}

Overview

An easy way to examine archaeological count data. This package provides several tests and measures of diversity: heterogeneity and evenness (Brillouin, Shannon, Simpson, etc.), richness and rarefaction (Chao1, Chao2, ACE, ICE, etc.), turnover and similarity (Brainerd-Robinson, etc.). It allows to easily visualize count data and statistical thresholds: rank vs. abundance plots, heatmaps, @ford1962 and @bertin1977 diagrams, etc. tabula provides methods for:

Diversity measurement: heterogeneity(), evenness(), richness(), rarefaction(), turnover().
Similarity measurement and co-occurrence: similarity(), occurrence().
Assessing sample size and significance: bootstrap(), jackknife(), simulate().
@bertin1977 or @ford1962 (battleship curve) diagrams: plot_bertin(), plot_ford().
Seriograph [@desachy2004]: seriograph(), matrigraph().
Heatmaps: plot_heatmap(), plot_spot().

kairos is a companion package to tabula that provides functions for chronological modeling and dating of archaeological assemblages from count data.

cite <- utils::citation("tabula")
print(cite, bibtex = FALSE)

Installation

You can install the released version of tabula from CRAN with:

install.packages("tabula")

And the development version from GitHub with:

# install.packages("remotes")
remotes::install_github("tesselle/tabula")

Usage

## Install extra packages (if needed)
# install.packages("folio")

## Load packages
library(tabula)

It assumes that you keep your data tidy: each variable (type/taxa) must be saved in its own column and each observation (sample/case) must be saved in its own row.

## Data from Lipo et al. 2015
data("mississippi", package = "folio")

## Ford diagram
plot_ford(mississippi)

## Co-occurrence of ceramic types
mississippi |> 
  occurrence() |> 
  plot_spot()

## Data from Conkey 1980, Kintigh 1989, p. 28
data("chevelon", package = "folio")

## Measure diversity by comparing to simulated assemblages
set.seed(12345)

chevelon |>
  heterogeneity(method = "shannon") |>
  simulate() |>
  plot()

chevelon |>
  richness(method = "count") |>
  simulate() |>
  plot()

Contributing

Please note that the tabula project is released with a Contributor Code of Conduct. By contributing to this project, you agree to abide by its terms.