R/data.R

In stefanocoretta/bayes.handson: Learning materials for the learnB4SS workshop

#' The phonetic profile of Korean formal and informal speech registers
#'
#' This tibble contains data from the study discussed in Winter and Grawunder 2012.
#'
#' @format A \code{\link[tibble]{tibble}} with 224 rows and 29 variables:
#'   \describe{
#'     \item{subject}{Subject unique identifier [categorical].}
#'     \item{gender}{Gender of subject [categorical].}
#'     \item{birthplace}{Birth place of subject [categorical].}
#'     \item{musicstudent}{Does the subject have music training? [binary: yes, no]}
#'     \item{scenario}{Unique identifier of different items.}
#'     \item{task}{Task type [categorical: \code{not} = mailbox task vs
#'        \code{dct} = discourse completion task]. In the mailbox task people
#'        left a note on somebody's mailbox, while in the discourse completion
#'        task they were prompted to role-play the start of a conversation.}
#'     \item{attitude}{Attitude [binary: \code{pol}ite vs \code{inf}ormal].}
#'     \item{total_duration}{Total duration of utterances in seconds [numeric].}
#'     \item{articulation_rate}{Number of syllables per second [numeric].}
#'     \item{f0mn}{Mean fundamental frequency (f0) [numeric].}
#'     \item{f0sd}{Stadard deviation of fundamental frequency [numeric].}
#'     \item{f0range}{Minimum and maximum fundamental frequency [numeric].}
#'     \item{inmn}{Mean intensity [numeric].}
#'     \item{insd}{Standard deviation of intensity [numeric].}
#'     \item{inrange}{Minimum and maximum fundamental frequency [numeric].}
#'     \item{shimmer}{Local shimmer (likewise normalized amplitude difference of consecutive periods) [numeric].}
#'     \item{jitter}{Local jitter (bsolute period-to-period difference divided by the average period) [numeric].}
#'     \item{HNRmn}{Mean Harmonics-to-Noise Ratio [numeric].}
#'     \item{H1H2}{Difference between first and second harmonic (H1-H2) [numeric].}
#'     \item{breath_count}{Number of audible breath intakes [count].}
#'     \item{filler_count}{Number of oral fillers like "oh/ah" [count].}
#'     \item{hiss_count}{Number of noisy breath intakes [count].}
#'     \item{nasal_count}{Number of nasal fillers like "mh/nh" [count].}
#'     \item{sil_count}{Number of silent pauses [count].}
#'     \item{ya_count}{Number of occurences of interjection "ya" (informal) [count].}
#'     \item{yey_count}{Number of occurences of interjection "yey" (polite) [count].}
#'  }
#' @source Bodo Winter, Sven Grawunder. 2012. The phonetic profile of Korean
#'     formal and informal speech registers, Journal of Phonetics 40(6). 808-815.
#'     https://doi.org/10.1016/j.wocn.2012.08.006
#'
"polite"

#' Word emotional valence
#'
#' This tibble contains data from Warriner 2013.
#'
#' @format A \code{\link[tibble]{tibble}} with 1000 rows and 2 variables:
#'   \describe{
#'     \item{word}{Word.}
#'     \item{valency_z}{Emotional valency of word (z-scores).}
#'   }
#' @source Warriner, A. B., Kuperman, V., & Brysbaert, M. 2013. Norms of
#'     valence, arousal, and dominance for 13,915 English lemmas. Behavior
#'     research methods, 45(4), 1191–1207.
#'     https://doi.org/10.3758/s13428-012-0314-x
"emotion"

#' Incomplete neutralisation in German
#'
#' This tibble contains data from Roettger et al. 2014.
#'
#' @format A \code{\link[tibble]{tibble}} with 6144 rows and 8 variables:
#'   \describe{
#'     \item{order}{Trial number.}
#'     \item{speaker_voice}{Speaker voice ID.}
#'     \item{item_pair}{ID of the lexical pair (voiceless/voiced).}
#'     \item{RT}{Reaction time.}
#'     \item{correct}{Whether the listener has correctly categorised the word.}
#'     \item{correct_voicing}{The underlying voicing category of the word.}
#'     \item{listener}{The listener ID.}
#'     \item{repetitiontype}{Whether the word was heard for the first time or subsequent times.}
#'   }
#' @source T.B. Roettger, B. Winter, S. Grawunder, J. Kirby, M. Grice. 2014.
#'     Assessing incomplete neutralization of final devoicing in German.
#'     Journal of Phonetics 43. 11-25
#'     https://doi.org/10.1016/j.wocn.2014.01.002.
"incomplete"

#' Vowel duration and consonant voicing in Italian
#'
#' This tibble contains data from Coretta 2020.
#'
#' @format A \code{\link[tibble]{tibble}} with 6144 rows and 8 variables:
#'   \describe{
#'     \item{item}{Trial number.}
#'     \item{speaker}{Speaker ID.}
#'     \item{word}{Target word.}
#'     \item{v1_duration}{Duration of V1 in milliseconds.}
#'     \item{c2_voicing}{Voicing of C2 (voiceless, voiced).}
#'     \item{vowel}{Target vowel.}
#'     \item{c2_place}{Place of articulation of C2.}
#'     \item{speech_rate}{Number of syllables per second.}
#'     \item{speech_rate_c}{Centred speech rate.}
#'   }
#' @source Coretta, Stefano. 2020. Vowel duration and consonant voicing: A production study.
#'     PhD Thesis. University of Manchester. https://doi.org/10.17605/OSF.IO/W92ME
"vowels"