similarity.tcata.repeatability {tempR}

Quantify TCATA assessor repeatability

Description

Quantify TCATA assessor repeatability using city block distance

Usage

similarity.tcata.repeatability(X)

Arguments

X

list of matrices, where each matrix is a TCATA data (given as an indicator matrix) for assessor of interest for one rep

Details

Similarity between repeated evaluations given by a TCATA assessor is quantified. The repeatability index can take on values between 0 and 1, which indicate complete dissimilarity (non-repeatability) and complete similarity (repeatability), respectively.

Value

repeatability.index average city block distance between matrices from replicated evaluations

References

Castura, J.C., Antúnez, L., Giménez, A., Ares, G. (2016). Temporal check-all-that-apply (TCATA): A novel temporal sensory method for characterizing products. Food Quality and Preference, 47, 79-90. doi:10.1016/j.foodqual.2015.06.017

Examples

  # Toy data from one TCATA assessor on a product over three sessions: rep1, rep2, rep3
  rep1 <- rbind(rep(0, 7),
                rep(0, 7),
                c(0, 0, 0, 1, 1, 1, 1),
                c(0, 0, 0, 1, 1, 1, 1),
                c(0, 0, 0, 1, 1, 1, 0))
  rep2 <- rbind(c(0, 0, 0, 1, 1, 1, 0),
                rep(0, 7),
                c(0, 1, 1, 1, 1, 1, 0),
                rep(1, 7),
                c(0, 0, 0, 1, 1, 1, 1))
  rep3 <- rbind(rep(0, 7),
                rep(0, 7),
                rep(1, 7),
                rep(1, 7),
                rep(1, 7))
  rep.data <- list(rep1, rep2, rep3)

  # Quantify similarity of assessor a1 to the other assessors
  similarity.tcata.repeatability(rep.data)