Skip to content

Commit

Permalink
remove ::: to fix NOTE
Browse files Browse the repository at this point in the history
  • Loading branch information
Jun Cheng committed Nov 22, 2020
1 parent a137566 commit 0d80b62
Show file tree
Hide file tree
Showing 2 changed files with 6 additions and 9 deletions.
4 changes: 2 additions & 2 deletions CRAN-RELEASE
Original file line number Diff line number Diff line change
@@ -1,2 +1,2 @@
This package was submitted to CRAN on 2019-09-10.
Once it is accepted, delete this file and tag the release (commit 76d7faa3ca).
This package was submitted to CRAN on 2020-11-22.
Once it is accepted, delete this file and tag the release (commit a137566).
11 changes: 4 additions & 7 deletions R/add_pval_ggplot.R
Original file line number Diff line number Diff line change
Expand Up @@ -135,20 +135,17 @@ add_pval <- function(ggplot_obj,
parse_text=NULL,
response="infer",
...){

# pairs fix ---------------------------------------------------------------

if(is.null(pairs)){
total_groups <- length(unique(ggplot_obj$data[[ggpval:::get_in_parenthesis(as.character(ggplot_obj$mapping[1]))]]))
total_groups <- length(unique(ggplot_obj$data[[get_in_parenthesis(as.character(ggplot_obj$mapping[1]))]]))

if(total_groups==2){
pairs <- list(c(1,2))
} else {
pairs <- lapply(2:total_groups, function(x) c(1,x))
}
}
# -------------------------------------------------------------------------



if (is.null(parse_text)){
if (is.null(annotation)){
parse_text <- TRUE
Expand Down

0 comments on commit 0d80b62

Please sign in to comment.