diff options
Diffstat (limited to 'R/corplot.R')
| -rw-r--r-- | R/corplot.R | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/R/corplot.R b/R/corplot.R index fc130bc..5f8f97d 100644 --- a/R/corplot.R +++ b/R/corplot.R @@ -1,5 +1,5 @@ utils::globalVariables(c('i', 'j', 'value')) -#' Correlation PLot (Upper Triangle) +#' Correlation Plot (Upper Triangle) #' #' Minimal ggplot2 correlation plot showing the upper triangle #' in the top-right corner with no axis labels. @@ -64,8 +64,8 @@ corplot <- function(R, title = NULL){ limits = c(-1, 1), name = NULL ) + - ggplot2::scale_x_discrete(limits = rev(levels(df$i))) + - ggplot2::scale_y_discrete(limits = levels(df$j)) + + ggplot2::scale_x_discrete(limits = levels(df$i)) + + ggplot2::scale_y_discrete(limits = rev(levels(df$j))) + ggplot2::coord_fixed() + ggplot2::theme_void() |