diff --git a/R/ggroc.R b/R/ggroc.R index d2238b0..7450eb2 100644 --- a/R/ggroc.R +++ b/R/ggroc.R @@ -1,7 +1,7 @@ #' Returns the coords as a data.frame in the right ordering for ggplot2 get.coords.for.ggplot <- function(roc) { - df <- as.data.frame(coords(roc, "all", transpose = TRUE), row.names = NA) + df <- as.data.frame(coords(roc, "all", transpose = FALSE), row.names = NA) return(df[rev(seq(nrow(df))),]) }