View source: R/import_rpraat.R
import_rpraat | R Documentation |
This function is to create compatibility with the rPraat
package.
It converts a 'rPraat' TextGrid object into an act transcript object.
import_rpraat(rPraatTextGrid, transcriptName = NULL)
rPraatTextGrid |
List; rPraat TextGrid object. |
transcriptName |
Character string; name of the transcript. |
Please note:
Time values of annotations in TextGrids may be below 0 seconds. Negative time values will be recognized corretly in the first place. When exporting transcript object to other formats like 'ELAN' .eaf, 'EXMARaLDA' .exb ect. annotations that are completely before 0 sec will be deleted, annotations that start before but end after 0 sec will be truncated. Please see also the function act::transcripts_cure_single
.
TextGrids and contained tiers may start and end at different times. These times do not need to match each other. The act package does not support start and end times of TextGrids and tiers and will. The default start of a TextGrid will be 0 seconds or the lowest value in case that annotations start below 0 seconds.
Credits: Thanks to Tomáš Bořil, the author of the rPraat package, for commenting on the exchange functions.
Transcript object.
corpus_import
, corpus_new
, import
, import_eaf
, import_exb
, import_textgrid
export_rpraat, import, import_textgrid, import_eaf
library(act)
# Path to the .TextGrid file that you want to read
path <- system.file("extdata", "examplecorpus", "GAT",
"ARG_I_PAR_Beto.TextGrid", package="act")
# To import a .TextGrid file of your choice:
## Not run:
path <- "PATH_TO_AN_EXISTING_TEXTGRID_ON_YOUR_COMPUTER"
## End(Not run)
# Make sure to have rPraat installed before you try the following
## Not run:
# Read TextGrid file with rPraat
rPraat.tg <- rPraat::tg.read(path)
# Convert to an act transcript
t <- act::import_rpraat(rPraat.tg)
# Change the name and add it to the examplecorpus
t@name <-"rpraat"
newcorpus <- act::transcripts_add(examplecorpus, t)
# Have a look
newcorpus@transcripts[["rpraat"]]
# Alternatively, you can use the general import function
t <- act::import(rPraat.tg)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.