#' For y-axis scaling
#'
#' @param maxTic maximum in tic intensity vector
#' @param maxBpc maximum in bpc intensity vector
#'
#' @return numeric of length one
#' @export
relativateTotalAndBase <- function(maxTic,
maxBpc) {
maxTic / maxBpc
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.