Nothing
#' Insert citation in Markdown format from Zotero
#'
#' Look up entries in Zotero database and insert citation in Markdown format.
#'
#' @param in_paren Logical. Determines if citation is in parentheses.
#'
#' @details The path to the Bib(La)TeX-file can be set in the global options and is set to
#' \code{references.bib} when the package is loaded. Once the path is changed in the
#' RStudio addin, the global option is updated.
#'
#' @return If the bibliography contains exactly one match the formatted citation is returned, otherwise
#' returns \code{NULL}. \code{md_cite} returns an in-text citation (\code{"@foo2016"}), \code{md_cite}
#' returns an in-parenthesis citation (\code{"[@foo2016]"}).
#'
#' @seealso \code{\link{insert_citation}}
#'
#' @examples
#' \dontrun{
#' md_cite_zotero()
#' }
#'
#' @import assertthat
md_cite_zotero <- function(
in_paren = TRUE
) {
if(!betterbiblatex_available()) stop("Could not connect to Zotero's Better-BibTeX extension. Is Zotero up and running?")
assert_that(is.flag(in_paren))
query_string <- paste0(
"http://localhost:23119/better-bibtex/cayw?format=pandoc&clipboard=yes"
, if(in_paren) "&brackets=yes"
)
rawToChar(curl::curl_fetch_memory(url = query_string)$content)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.