printARFFfile {vocaldia}

printARFFfile: Create arff files by creating and flattening vocaldias

Description

Generate ARFF files from vocalisation diagrams

Usage

printARFFfile(
  df,
  ids = c(),
  idcolumn = "id",
  noPauseTypes = F,
  sampled = 0,
  individual = TRUE,
  nodecolumn = "role",
  classcolumn = "dx",
  file = ""
)

Arguments

df

df a data frame consisting, minimally, of a column for vocalisation/pause start times, a column for end times, and a column identifying the speaker, speaker role or 'Floor' (for silences).

ids

Ids of dialogues to generate (as defined in column named idcolumn)

idcolumn

the name of the column containing the dialogue id

noPauseTypes

if TRUE, ignore distinctions between pauses (SwitchingPause, GrpSwitchingPause, etc)

sampled

if >0 use getSampledVocalMatrix with rate=sampled

individual

whether to include individual speakers or group them into a single Vocalisation node

nodecolumn

the name of the column containing the node (speaker) name (e.g. 'speaker', 'role').

classcolumn

the name of the column containing the target class (or value).

file

name of ARFF file to be generated, or "" (print to console).

Details

Use this function to generate turn-taking diragrams in ARFF format for

References

S. Luz. Automatic identification of experts and performance prediction in the multimodal math data corpus through analysis of speech interaction. In Proceedings of the 15th ACM on International Conference on Multimodal Interaction, ICMI'13, pages 575–582, New York, NY, USA, 2013. ACM.

See Also

getSampledVocalCountMatrix, getTurnTakingProbMatrix.

Examples

data(vocdia)
atdarff <- tempfile(pattern='vocaldia-', fileext='arff')
printARFFfile(atddia, individual=TRUE, classcolumn='dx',
              file=atdarff, noPauseTypes=FALSE)
library("foreign")
x1 <- read.arff(atdarff)
x1[1:3,]
## remove empty columns
x1[,c(unlist(apply(x1[1:(ncol(x1)-1)],2,sum)!=0), TRUE)]