knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
Millidecade bands computed from the acoustic data collected in the LifeWatch Broadband Acoustic Network. Frequency range from 0 to 24 kHz. Millidecade bands computed according to Miksis-Olds et al. (2021)1
# Get the abstract and/or description from IMIS and print here library(jsonlite) dasid <- fromJSON("https://www.vliz.be/en/imis?module=dataset&dasid=8172&show=json") abstract <- dasid[["datasetrec"]][["EngAbstract"]] description <- dasid[["datasetrec"]][["EngDescr"]] if (is.null(abstract) & is.null(description)){ } else if(is.null(abstract) & !is.null(description)){ out <- description } else if(!is.null(abstract) & is.null(description)){ out <- abstract } else if(!is.null(abstract) & !is.null(description)){ out <- paste0(abstract, "</br>", description) } cat(out)
library(jsonlite) # Set base url url <- "https://www.vliz.be/en/imis?module=dataset&dasid=8172" dasid <- fromJSON(paste0(url, "&show=json")) # Build citation. Get active DOI. citation <- dasid[["datasetrec"]][["Citation"]] citation <- paste0("> ", citation, " ", url, ". Accessed through the LifeWatch Data Explorer / lwdataexplorer R package.") # Get license license <- dasid[["datasetrec"]][["AccConstrDisplay"]]
cat(citation)
cat(paste0("<b>Availability:</b>", license))
Please acknowledge as: This work makes use of the LifeWatch observation data and infrastructure (provided by VLIZ) funded by Research Foundation - Flanders (FWO) as part of the Belgian contribution to LifeWatch.
These data are also available in the R language with the lwdataxplorer package.
1Miksis-Olds, J. L., Dugan, P. J., Martin, S. B., Klinck, H., Mellinger, D. K., Mann, D. A., Ponirakis, D. W., and Boebel, O. (2021). Ocean Sound Analysis Software for Making Ambient Noise Trends Accessible (MANTA). Frontiers in Marine Science, 8:703650. https://doi.org/10.3389/fmars.2021.703650
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.