#' @title
#' Convenience Functions
#'
#' @description
#' Convenience functions that simply tasks by allowing them to be executed from
#' the R console such as opening the OMOP Concept page.
#'
#' @name convenience_functions
#' @keywords internal
NULL
#' Open concept by concept_id in Browser
#' @export
browse_athena <-
function(concept_id) {
browseURL(url = paste0("http://athena.ohdsi.org/search-terms/terms/",
concept_id))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.