# Don't use directly
datapath <- system.file('extdata', package='praatpicture')
soundFile <- paste0(datapath, '/1.wav')
# With stylized text
praatpicture(soundFile, frames='TextGrid')
# Without stylized text
praatpicture(soundFile, frames='TextGrid', tg_specialChar=FALSE)
Run the code above in your browser using DataLab