praatRetime {retimer} | R Documentation |
praatRetime
Description
praatRetime
Usage
praatRetime(wav, tg)
Arguments
wav |
path to a wav file or a tuneR WAVE object |
tg |
a 'Praat' TextGrid object with 2 tiers: First tier should be intervals in the input audio file and second tier should be the same intervals with the desired onsets (t1) and offsets (t2). |
Value
A wav file with the timing of the second tier of the TextGrid will be saved to the outfile location.
See Also
[read_tg()] for reading an existing TextGrid and [write_tg()] for saving a tibble as a TextGrid.
Examples
set.seed(42)
data(mm1)
dur <- length(mm1)/mm1@samp.rate
x <- runif(10)
t2_out <- dur*cumsum(x)/sum(x)
t1_out <- c(0, t2_out[-length(t2_out)])
t2_in <- dur*seq_len(10)/10
t1_in <- c(0, t2_in[-length(t2_in)])
tg <- dplyr::tibble(
name = rep(c("old", "new"), each = 10),
type = "interval",
t1 = c(t1_in, t1_out),
t2 = c(t2_in, t2_out),
label = rep(letters[1:10], times = 2)
) |>
tidyr::nest(data = c(t1, t2, label))
if (Sys.which("praat") != "") {
wav_retimed <- praatRetime(mm1, tg)
} else {
message("Skipping example because Praat is not installed.")
}
[Package retimer version 0.1.3 Index]