Use a real annotation to create a dummy annotation with degraded ratings and directly add info to the ChildRecordings class

New.annotations(
  row.meta,
  ChildRecordings,
  time.sd = NULL,
  change.cat.prob = NULL,
  new.name = NULL
)

Arguments

row.meta

: a row meta from ChildRecordings$all.meta to transform into dummy annotation

ChildRecordings

: a ChildRecordings class

time.sd

: a time deviation in millisecond to apply to the segments on using a normal law

change.cat.prob

: The probability of a change in speaker_type

new.name

: a string containing a new annotator name

Examples

if (FALSE) { library(ChildRecordsR) path = "/mnt/94707AA4707A8CAC/CNRS/corpus/vandam-daylong-demo" CR = ChildRecordings(path) CR$all.meta New.annotations(row.meta = CR$all.meta[2,], ChildRecordings = CR, time.sd = 1500, change.cat.prob = 0.10, new.name = "vtc_BAD") CR$all.meta }