Commit 0c37892b authored by houyun's avatar houyun
Browse files

Avoid duplicate classes attributes

parent 889672af

R/as-md-tbl.R

+1 −3
Original line number Diff line number Diff line
@@ -207,9 +207,7 @@ as_md_tbl.easycorrelation <- function(x, 
#' @method as_md_tbl correlate

#' @rdname as_md_tbl

as_md_tbl.correlate <- function(x, ...) {

  x <- as_md_tbl(as_matrix_data(x, ...))

  class(x) <- c("cor_md_tbl", class(x))

  x

  as_md_tbl(as_matrix_data(x, ...))

}



#' @method as_md_tbl grouped_correlate

CRA Git | Maintained and supported by SUSTech CRA and CCSE