R/get_ytsubs.R

Defines functions get_ytsubs

get_ytsubs <- function(q){
  
  require(youtubecaption)
  
  dcat <- get_caption(q)
  
  (dcat2 <- c(dcat$text) %>% str_c(collapse = ", "))

  # return results
  return(dcat2)
  
}
dataning/tester documentation built on May 28, 2020, 12:50 a.m.