authors <- eval(parse(text = meta$`Authors@R`))
authors <- authors[which(unlist(lapply(authors, function(x) { "aut" %in% x$role })))]

bibentry(
  bibtype = "manual",
  title = meta$Title,
  author = authors,
  year = format(Sys.Date(), "%Y"),
  note = sprintf("R package version %s", meta$Version),
  url = "https://cran.r-project.org/package=frictionless",
  doi = "10.5281/zenodo.5815355"
)
