adding example of sections

Author: jwijffels

R/whisper.R

@@ -160,6 +160,9 @@ predict.whisper <- function(object, newdata, type = c("transcribe", "translate")
 #'                  language = "en")
 #' trans <- predict(model, newdata = system.file(package = "audio.whisper", "samples", "stereo.wav"), 
 #'                  language = "auto", diarize = TRUE)
+#' trans <- predict(model, newdata = system.file(package = "audio.whisper", "samples", "stereo.wav"), 
+#'                  language = "auto", diarize = TRUE, 
+#'                  sections = data.frame(start = c(1310, 12140), duration = c(9810, 30740)))
 #' 
 #' \dontshow{
 #' ## Or provide the path to the model