Creates a merged sound file from old sound files in a folder. If the annotation argument is not equal to NULL, it creates an annotation file (Praat .TextGrid, ELAN .eaf or EXMARaLDA .exb) with original sound names annotation.

concatenate_soundfiles(
  path,
  result_file_name = "concatenated",
  annotation = "textgrid",
  separate_duration = 0
)

Arguments

path

path to the directory with soundfiles.

result_file_name

name of the result and annotation files.

annotation

character. There are several variants: "textgrid" for Praat TextGrid, "eaf" for ELAN's .eaf file, or "exb" for EXMARaLDA's .exb file. It is also possible to use NULL in order to prevent the creation of the annotation file.

separate_duration

double. It is possible to add some silence between concatenated sounds. This variable denotes duration of this soundless separator in seconds.

Value

no output

Author

George Moroz <agricolamz@gmail.com>

Examples

# create two files in a temprary folder "test_folder" s1 <- system.file("extdata", "test.wav", package = "phonfieldwork") s2 <- system.file("extdata", "post.wav", package = "phonfieldwork") tdir <- tempdir() file.copy(c(s1, s2), tdir)
#> [1] TRUE TRUE
# here are two .wav files in a folder list.files(tdir)
#> [1] "downlit" "filecf7f54166c32.so" "post.wav" #> [4] "test.wav"
# [1] "post.wav" "test.wav" ... # Concatenate all files from the folder into concatenated.wav and create # corresponding TextGrid concatenate_soundfiles(path = tdir, result_file_name = "concatenated") list.files(tdir)
#> [1] "concatenated.TextGrid" "concatenated.wav" "downlit" #> [4] "filecf7f54166c32.so" "post.wav" "test.wav"
# [1] "concatenated.TextGrid" "concatenated.wav" "post.wav" "test.wav" ...