diff --git a/R/scale-discrete-.r b/R/scale-discrete-.r index 5c7bef8134..555b902db1 100644 --- a/R/scale-discrete-.r +++ b/R/scale-discrete-.r @@ -170,6 +170,6 @@ c.mapped_discrete <- function(..., recursive = FALSE) { new_mapped_discrete(NextMethod()) } #' @export -as.data.frame.mapped_discrete <- function (x, ..., stringsAsFactors = default.stringsAsFactors()) { - as.data.frame.vector(x = unclass(x), ..., stringsAsFactors = stringsAsFactors) +as.data.frame.mapped_discrete <- function (x, ...) { + as.data.frame.vector(x = unclass(x), ...) }