similarity.tcata.replication: Quantify TCATA assessor replication

Description Usage Arguments Details Value References Examples

View source: R/tcata.R

Description

Quantify TCATA assessor replication using city block distance

Usage

1
similarity.tcata.replication(this.assessor, other.assessors)

Arguments

this.assessor

TCATA data (given as an indicator matrix) for assessor of interest

other.assessors

TCATA data (given as an indicator matrix) for other assessors

Details

Similarity between one TCATA assessor and other assessors on the panel is quantified. The replication index can take on values between 0 and 1, which indicate complete dissimilarity (disagreement) and complete similarity (agreement), respectively.

Value

replication.index city block distance between this assessor and other assessors

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. http://dx.doi.org/10.1016/j.foodqual.2015.06.017

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
  # Toy TCATA data for three assessors: a1, a2, a3
  a1 <- 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))
  a2 <- 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))
  a3 <- rbind(rep(0, 7),
              rep(0, 7),
              rep(1, 7),
              rep(1, 7),
              rep(1, 7))

  # Quantify similarity of assessor a1 to the other assessors
  similarity.tcata.replication(a1, rbind(a2, a3))

Example output

[1] 0.7142857

tempR documentation built on May 2, 2019, 9:33 a.m.