jum_version <- function(){
  p <- system("jumanpp -v", intern = TRUE)
  if (str_detect(p, "command not found")) {
    res <- "JUMAN++ is not be installed or we cannot find the path to JUMAN++"
  }
  res <- p %>% str_trim()
  return(res)
}