#' Ustawianie pozycji etykiety względem zakresu danych
#'
#' @param data dane do położenia etykiety
#' @param ratio proporcja względem maksymalnej wartości danych
#'
#' @export
#'
label_location <- function(data, ratio = 30) {
data + max(data, na.rm = T)/ratio
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.