R/obj_size.R

In jixing475/manuscriptsJX: manuscripts tools

#' @title calculate the size of objector
#' @description calculate the size of objector
#' @param x R object
#'
#' @return string
#'
#' @examples
#'
#'
#' @rdname obj_size
#' @export

obj_size <- function(x){
    size <- format(object.size(x), units = "auto")
    return(size)
}