Build Hyperlinks
build_hyperlink.RdBuild hyperlinks for Google Sheets, Excel, or HTML. build_hyperlinks() appends a value to the end of a base url, while hyperlink_curie()` converts
CURIEs to hyperlinks.
Usage
build_hyperlink(x, url, as, ..., sep = "", text = x, preserve = "text")
hyperlink_curie(curie, as, ..., def = "obo_generic")Arguments
- x
 Value(s) to append, as a character vector.
- url
 One or more URLs or URL names recognized by this package, as a character vector. If only one value is provided, it will be recycled; otherwise the length of
urlandxmust match. Seeget_url()for recognized base URL names.- as
 What format to use for the hyperlink, as a string; one of "gs" (Google Sheet), "xlsx" (Excel), or "html".
- ...
 (Only for
as = "html") One or more name-value pairs of html<a>attributes.- sep
 One or more separators to use between
urlandx, as a character vector. If only one value is provided (e.g. default = ""), it will be recycled; otherwise the length ofsepandxmust match. If anyurlends in the correspondingsep, an additionalsepwill not be added.- text
 (OPTIONAL) The text to display for each link, as a character vector. The default uses
xas the text. IfNULL, the full URL will serve as the text. If a string, the value will be used for the text of each hyperlink.- preserve
 The value to return when
urlisNA, as a string. One of "url" or "text" (default). Note that the default forbuild_hyperlink()is opposite the default offormat_hyperlink()becausetextis provided by default.- curie
 A character vector of CURIEs to convert to hyperlinks.
- def
 The definition to use when checking for CURIEs. See
is_curie()for details.
See also
Functions used internally: append_to_url() and
format_hyperlink().
Examples
build_hyperlink(
    x = "DiseaseOntology",
    url = "github",
    as = "html",
    text = "A hyperlink!"
)
#> [1] "<a href=\"https://github.com/DiseaseOntology\">A hyperlink!</a>"
# create CURIE links by passing local identifiers as `x` and prefixes as `url`
build_hyperlink(
    x = c("4", "D004194"),
    url = c("DOID", "MESH"),
    as = "gs",
    text = c("DOID:4", "MESH:D004194")
)
#> <googlesheets4_formula[2]>
#> [1] =HYPERLINK("http://purl.obolibrary.org/obo/DOID_4", "DOID:4")               
#> [2] =HYPERLINK("https://meshb.nlm.nih.gov/record/ui?ui=D004194", "MESH:D004194")
# provide internal URL names or direct URLs to append to
# BE SURE to use `preserve = 'url'` when text is `NA`.
build_hyperlink(
    x = c("4", "fakeID"),
    url = c("DOID", "https://madeup.url.com"),
    as = "gs",
    text = c("DOID:4", NA),
    sep = c("_", "/"),
    preserve = "url"
)
#> <googlesheets4_formula[2]>
#> [1] =HYPERLINK("http://purl.obolibrary.org/obo/DOID_4", "DOID:4")
#> [2] =HYPERLINK("https://madeup.url.com/fakeID")