# NOT RUN {
# path to sample data in the "wide format"
fNameData <- system.file ("extdata", "data-capitals.tsv", package="soundcorrs")
# path to a sample transcription
fNameTrans <- system.file ("extdata", "trans-common.tsv", package="soundcorrs")
ger <- read.scOne (fNameData, "German", "ALIGNED.German", fNameTrans)
pol <- read.scOne (fNameData, "Polish", "ALIGNED.Polish", fNameTrans)
spa <- read.scOne (fNameData, "Spanish", "ALIGNED.Spanish", fNameTrans)
dataset <- soundcorrs (ger, pol, spa)
# }
Run the code above in your browser using DataLab