predict_event: Predict Event and Accumulation Dates

In kairos: Analysis of Chronological Patterns from Archaeological Count Data

Predict Event and Accumulation Dates

Description

Estimates the event and accumulation dates of an assemblage.

Usage

predict_event(object, data, ...)

predict_accumulation(object, data, ...)

## S4 method for signature 'EventDate,missing'
predict_event(object, margin = 1, level = 0.95, calendar = get_calendar())

## S4 method for signature 'EventDate,matrix'
predict_event(
  object,
  data,
  margin = 1,
  level = 0.95,
  calendar = get_calendar()
)

## S4 method for signature 'EventDate,missing'
predict_accumulation(object, level = 0.95, calendar = get_calendar())

## S4 method for signature 'EventDate,matrix'
predict_accumulation(object, data, level = 0.95, calendar = get_calendar())

Arguments

object	An EventDate object.
data	A numeric matrix or a data.frame of count data (absolute frequencies) for which to predict event and accumulation dates.
...	Further arguments to be passed to internal methods.
margin	A numeric vector giving the subscripts which the prediction will be applied over: 1 indicates rows, 2 indicates columns.
level	A length-one numeric vector giving the confidence level.
calendar	An aion::TimeScale object specifying the target calendar (see aion::calendar()). If NULL, rata die are returned.

Value

A data.frame.

Author(s)

N. Frerebeau

References

Bellanger, L. & Husi, P. (2013). Mesurer et modéliser le temps inscrit dans la matière à partir d'une source matérielle : la céramique médiévale. In Mesure et Histoire Médiévale. Histoire ancienne et médiévale. Paris: Publication de la Sorbonne, p. 119-134.

Bellanger, L. & Husi, P. (2012). Statistical Tool for Dating and Interpreting Archaeological Contexts Using Pottery. Journal of Archaeological Science, 39(4), 777-790. \Sexpr[results=rd]{tools:::Rd_expr_doi("10.1016/j.jas.2011.06.031")}.

Bellanger, L., Tomassone, R. & Husi, P. (2008). A Statistical Approach for Dating Archaeological Contexts. Journal of Data Science, 6, 135-154.

Bellanger, L., Husi, P. & Tomassone, R. (2006). Une approche statistique pour la datation de contextes archéologiques. Revue de Statistique Appliquée, 54(2), 65-81.

Bellanger, L., Husi, P. & Tomassone, R. (2006). Statistical Aspects of Pottery Quantification for the Dating of Some Archaeological Contexts. Archaeometry, 48(1), 169-183. \Sexpr[results=rd]{tools:::Rd_expr_doi("10.1111/j.1475-4754.2006.00249.x")}.

See Also

Other event date tools: density_event(), event(), model_event, plot_event, resample_event

Examples

## Data from Peeples and Schachner 2012
data("zuni", package = "folio")

## Assume that some assemblages are reliably dated (this is NOT a real example)
zuni_dates <- c(
  LZ0569 = 1097, LZ0279 = 1119, CS16 = 1328, LZ0066 = 1111,
  LZ0852 = 1216, LZ1209 = 1251, CS144 = 1262, LZ0563 = 1206,
  LZ0329 = 1076, LZ0005Q = 859, LZ0322 = 1109, LZ0067 = 863,
  LZ0578 = 1180, LZ0227 = 1104, LZ0610 = 1074
)

## Model the event and accumulation date for each assemblage
model <- event(zuni, zuni_dates, rank = 10)
plot(model, select = 1:10, event = TRUE, flip = TRUE)

kairos documentation built on April 3, 2025, 7:08 p.m.