#' @title wyrównanie długości
#' @description
#' Zwraca przekazany argument wyrównując go spacjami z lewej, tak by długość
#' zwróconej wartości odpowiadała długości wstawki R.
#'
#' Przydatna do wstawianie wartości do multiline tables w wypadku, gdy wyniki
#' obliczono wcześniej w innej wstawce R.
#' @param x wartość
#' @return NULL
#' @export
W = function(x){
dl = 4 + nchar(deparse(sys.call()))
return(sprintf(paste0('% ', dl, 's'), x))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.