R/printer.R

In CFehrmann/TelegramR: Get information of your work in R with Telegram

#' Title
#'
#' @param r what you want in the second column
#' @param x what you want in the first column
#'
#' @return A tibble
#' @export
#' @importFrom tibble data_frame
#' @importFrom utils head adist
#' @importFrom dplyr select
#' @examples
#' printer(x = rnorm(5), r = rnorm(5))
printer=function(r,x){
  x=data_frame(x=x, r=r)
  print(head(x))
  return(x)
}