Skip to content

Commit

Permalink
cran submission 0.0.10
Browse files Browse the repository at this point in the history
  • Loading branch information
IndrajeetPatil committed Mar 17, 2019
1 parent 972e711 commit 4b9d01d
Show file tree
Hide file tree
Showing 132 changed files with 210 additions and 221 deletions.
2 changes: 2 additions & 0 deletions CRAN-RELEASE
Original file line number Diff line number Diff line change
@@ -0,0 +1,2 @@
This package was submitted to CRAN on 2019-03-17.
Once it is accepted, delete this file and tag the release (commit 972e711c4b).
10 changes: 5 additions & 5 deletions DESCRIPTION
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
Type: Package
Package: ggstatsplot
Title: 'ggplot2' Based Plots with Statistical Details
Version: 0.0.9.9000
Version: 0.0.10
Authors@R:
c(person(given = "Indrajeet",
family = "Patil",
Expand Down Expand Up @@ -53,15 +53,15 @@ Imports:
methods,
paletteer (>= 0.2.1),
psych (>= 1.8.12),
purrr (>= 0.3.1),
purrrlyr (>= 0.0.4),
rcompanion (>= 2.0.10),
purrr (>= 0.3.2),
purrrlyr (>= 0.0.5),
rcompanion (>= 2.1.1),
rlang (>= 0.3.1),
scales (>= 1.0.0),
sjstats (>= 0.17.3),
stats,
stringr (>= 1.3.1),
tibble (>= 2.0.1),
tibble (>= 2.1.1),
tidyr (>= 0.8.3),
utils,
WRS2 (>= 0.10-0)
Expand Down
1 change: 0 additions & 1 deletion NAMESPACE
Original file line number Diff line number Diff line change
Expand Up @@ -37,7 +37,6 @@ export(signif_column)
export(specify_decimal_p)
export(subtitle_anova_bayes)
export(subtitle_anova_parametric)
export(subtitle_anova_parametric_repeated)
export(subtitle_anova_robust)
export(subtitle_contingency_tab)
export(subtitle_friedman_nonparametric)
Expand Down
4 changes: 2 additions & 2 deletions R/ggcoefstats.R
Original file line number Diff line number Diff line change
Expand Up @@ -38,7 +38,7 @@
#' @param p.adjust.method Adjustment method for *p*-values for multiple
#' comparisons. Possible methods are: `"holm"`, `"hochberg"`, `"hommel"`,
#' `"bonferroni"`, `"BH"`, `"BY"`, `"fdr"`, `"none"`. Default is no correction
#' (`"none"`). This argument is relevent for multiplicity correction for
#' (`"none"`). This argument is relevant for multiplicity correction for
#' multiway ANOVA designs (see,
#' \href{https://link.springer.com/article/10.3758/s13423-015-0913-5}{Cramer
#' et al., 2015}).
Expand All @@ -54,7 +54,7 @@
#' probability level for CI.
#' @param coefficient.type Relevant only for ordinal regression models (`clm` ,
#' `clmm`, `"svyolr"`, and `polr`), this argument decides which parameters are
#' display in the plot. Availabel parameters are: parameter that measures the
#' display in the plot. Available parameters are: parameter that measures the
#' **intercept**, i.e. the log-odds distance between response values
#' (`"alpha"`); effects on the **location** (`"beta"`); or effects on the
#' **scale** (`"zeta"`). For `clm` and `clmm` models, by default, only
Expand Down
6 changes: 4 additions & 2 deletions R/helpers_ggbetween_anova_subtitles.R
Original file line number Diff line number Diff line change
Expand Up @@ -670,6 +670,7 @@ subtitle_anova_bayes <- function(data,
#' @importFrom sjstats eta_sq omega_sq
#'
#' @examples
#' \dontrun{
#' # setup
#' set.seed(123)
#' library(ggstatsplot)
Expand All @@ -683,14 +684,15 @@ subtitle_anova_bayes <- function(data,
#' tidyr::gather(., key, value, LDLF:HDHF)
#'
#' # creating the subtitle
#' ggstatsplot::subtitle_anova_parametric_repeated(
#' ggstatsplot:::subtitle_anova_parametric_repeated(
#' data = data_bugs,
#' x = key,
#' y = value,
#' id.variable = Subject,
#' k = 2
#' )
#' @export
#' }
#' @keywords internal

# function body
subtitle_anova_parametric_repeated <- function(data,
Expand Down
14 changes: 1 addition & 13 deletions R/helpers_pairwise_comparison.R
Original file line number Diff line number Diff line change
Expand Up @@ -531,24 +531,12 @@ pairwise_p <- function(data,
# extracting the robust pairwise comparisons and tidying up names
rob_df_tidy <-
suppressMessages(rob_pairwise_df$comp %>%
tibble::as_tibble(x = ., .name_repair = "unique"))

# rename columns to have unique names
if (utils::packageVersion("tibble") > "2.0.1") {
rob_df_tidy %<>%
tibble::as_tibble(x = ., .name_repair = "unique")) %>%
dplyr::rename(
.data = .,
group1 = Group...1,
group2 = Group...2
)
} else {
rob_df_tidy %<>%
dplyr::rename(
.data = .,
group1 = Group..1,
group2 = Group..2
)
}

# cleaning the raw object and getting it in the right format
df <-
Expand Down
8 changes: 4 additions & 4 deletions README.Rmd
Original file line number Diff line number Diff line change
Expand Up @@ -18,9 +18,9 @@ knitr::opts_chunk$set(

Package | Status | Usage | GitHub | References
----------------- | ----------------- | ----------------- | ----------------- | -----------------
[![CRAN_Release_Badge](http://www.r-pkg.org/badges/version-ago/ggstatsplot)](https://CRAN.R-project.org/package=ggstatsplot) | [![Travis Build Status](https://travis-ci.org/IndrajeetPatil/ggstatsplot.svg?branch=master)](https://travis-ci.org/IndrajeetPatil/ggstatsplot) | [![Daily downloads badge](https://cranlogs.r-pkg.org/badges/last-day/ggstatsplot?color=blue)](https://CRAN.R-project.org/package=ggstatsplot) | [![GitHub version](https://img.shields.io/badge/GitHub-0.0.9.9000-orange.svg?style=flat-square)](https://github.com/IndrajeetPatil/ggstatsplot/) | [![Website](https://img.shields.io/badge/website-ggstatsplot-orange.svg?colorB=E91E63)](https://indrajeetpatil.github.io/ggstatsplot/)
[![CRAN_Release_Badge](http://www.r-pkg.org/badges/version-ago/ggstatsplot)](https://CRAN.R-project.org/package=ggstatsplot) | [![Travis Build Status](https://travis-ci.org/IndrajeetPatil/ggstatsplot.svg?branch=master)](https://travis-ci.org/IndrajeetPatil/ggstatsplot) | [![Daily downloads badge](https://cranlogs.r-pkg.org/badges/last-day/ggstatsplot?color=blue)](https://CRAN.R-project.org/package=ggstatsplot) | [![GitHub version](https://img.shields.io/badge/GitHub-0.0.10.9000-orange.svg?style=flat-square)](https://github.com/IndrajeetPatil/ggstatsplot/) | [![Website](https://img.shields.io/badge/website-ggstatsplot-orange.svg?colorB=E91E63)](https://indrajeetpatil.github.io/ggstatsplot/)
[![CRAN Checks](https://cranchecks.info/badges/summary/ggstatsplot)](https://cran.r-project.org/web/checks/check_results_ggstatsplot.html) | [![AppVeyor Build Status](https://ci.appveyor.com/api/projects/status/github/IndrajeetPatil/ggstatsplot?branch=master&svg=true)](https://ci.appveyor.com/project/IndrajeetPatil/ggstatsplot) | [![Weekly downloads badge](https://cranlogs.r-pkg.org/badges/last-week/ggstatsplot?color=blue)](https://CRAN.R-project.org/package=ggstatsplot) | [![Github Pending PRs](http://githubbadges.herokuapp.com/IndrajeetPatil/ggstatsplot/pulls.svg?style=flat)](https://github.com/IndrajeetPatil/ggstatsplot/pulls)| [![Rdoc](https://www.rdocumentation.org/badges/version/ggstatsplot)](https://www.rdocumentation.org/packages/ggstatsplot)
[![minimal R version](https://img.shields.io/badge/R%3E%3D-3.5.0-6666ff.svg)](https://cran.r-project.org/) | [![lifecycle](https://img.shields.io/badge/lifecycle-maturing-blue.svg)](https://www.tidyverse.org/lifecycle/) | [![Monthly downloads badge](https://cranlogs.r-pkg.org/badges/last-month/ggstatsplot?color=blue)](https://CRAN.R-project.org/package=ggstatsplot) | [![Github Issues](http://githubbadges.herokuapp.com/IndrajeetPatil/ggstatsplot/issues.svg)](https://github.com/IndrajeetPatil/ggstatsplot/issues) | [![vignettes](https://img.shields.io/badge/vignettes-0.0.9-orange.svg?colorB=FF5722)](https://cran.r-project.org/web/packages/ggstatsplot/vignettes/)
[![minimal R version](https://img.shields.io/badge/R%3E%3D-3.5.0-6666ff.svg)](https://cran.r-project.org/) | [![lifecycle](https://img.shields.io/badge/lifecycle-maturing-blue.svg)](https://www.tidyverse.org/lifecycle/) | [![Monthly downloads badge](https://cranlogs.r-pkg.org/badges/last-month/ggstatsplot?color=blue)](https://CRAN.R-project.org/package=ggstatsplot) | [![Github Issues](http://githubbadges.herokuapp.com/IndrajeetPatil/ggstatsplot/issues.svg)](https://github.com/IndrajeetPatil/ggstatsplot/issues) | [![vignettes](https://img.shields.io/badge/vignettes-0.0.10-orange.svg?colorB=FF5722)](https://cran.r-project.org/web/packages/ggstatsplot/vignettes/)
[![GitHub code size in bytes](https://img.shields.io/github/languages/code-size/IndrajeetPatil/ggstatsplot.svg)](https://github.com/IndrajeetPatil/ggstatsplot) | [![Coverage Status](https://coveralls.io/repos/github/IndrajeetPatil/ggstatsplot/badge.svg?branch=master)](https://coveralls.io/github/IndrajeetPatil/ggstatsplot?branch=master) | [![Total downloads badge](https://cranlogs.r-pkg.org/badges/grand-total/ggstatsplot?color=blue)](https://CRAN.R-project.org/package=ggstatsplot) | [![Github Stars](https://img.shields.io/github/stars/IndrajeetPatil/ggstatsplot.svg?style=social&label=Github)](https://github.com/IndrajeetPatil/ggstatsplot) | [![DOI](https://zenodo.org/badge/DOI/10.5281/zenodo.2074621.svg)](https://doi.org/10.5281/zenodo.2074621)
[![Licence](https://img.shields.io/badge/licence-GPL--3-blue.svg)](https://www.gnu.org/licenses/gpl-3.0.en.html) | [![Codecov test coverage](https://codecov.io/gh/IndrajeetPatil/ggstatsplot/branch/master/graph/badge.svg)](https://codecov.io/gh/IndrajeetPatil/ggstatsplot?branch=master) | [![HitCount](http://hits.dwyl.io/IndrajeetPatil/ggstatsplot.svg)](http://hits.dwyl.io/IndrajeetPatil/ggstatsplot) | [![Last-changedate](https://img.shields.io/badge/last%20change-`r gsub('-', '--', Sys.Date())`-yellowgreen.svg)](/commits/master) | [![GitHub last commit](https://img.shields.io/github/last-commit/IndrajeetPatil/ggstatsplot.svg)](https://github.com/IndrajeetPatil/ggstatsplot/commits/master)
![dependencies](https://tinyverse.netlify.com/badge/ggstatsplot) | [![Covrpage Summary](https://img.shields.io/badge/covrpage-Last_Build_2019_01_31-yellowgreen.svg)](https://github.com/IndrajeetPatil/ggstatsplot/blob/master/tests/README.md) | [![saythanks](https://img.shields.io/badge/Say%20Thanks-!-1EAEDB.svg)](https://saythanks.io/to/IndrajeetPatil) | [![Project Status](http://www.repostatus.org/badges/latest/active.svg)](http://www.repostatus.org/#active) | [![contributions welcome](https://img.shields.io/badge/contributions-welcome-brightgreen.svg?style=flat)](https://github.com/IndrajeetPatil/ggstatsplot/issues)
Expand Down Expand Up @@ -104,7 +104,7 @@ regression | <font color="green">Yes</font> | <font color="green">Yes</font> | <

# Installation

To get the latest, stable CRAN release (`0.0.9`):
To get the latest, stable CRAN release (`0.0.10`):
```{r installationCRAN, eval = FALSE}
utils::install.packages(pkgs = "ggstatsplot")
```
Expand All @@ -114,7 +114,7 @@ installed (specifically, `libx11`, `mesa` and Mesa OpenGL Utility library -
`glu`) for the dependency package `rgl` to work.

You can get the **development** version of the package from GitHub
(`0.0.9.9000`). To see what new changes (and bug fixes) have been made to the
(`0.0.10.9000`). To see what new changes (and bug fixes) have been made to the
package since the last release on `CRAN`, you can check the detailed log of
changes here: <https://indrajeetpatil.github.io/ggstatsplot/news/index.html>

Expand Down
Loading

2 comments on commit 4b9d01d

@lintr-bot
Copy link

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

R/ggcorrmat.R:270:5: warning: local variable ‘corr.method.text’ assigned but may not be used

corr.method.text <- "Pearson"
    ^~~~~~~~~~~~~~~~

R/ggcorrmat.R:379:9: warning: local variable ‘n_summary’ assigned but may not be used

n_summary <- numdf_summary(corr_df$n)
        ^~~~~~~~~

R/ggscatterstats.R:215:5: style: Opening curly braces should never go on their own line and should always be followed by a new line.

​    {
    ^

R/helpers_ggbetween_anova_subtitles.R:282:1: style: Variable and function names should not be longer than 30 characters.

subtitle_friedman_nonparametric <- function(data,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

R/helpers_ggbetween_anova_subtitles.R:698:1: style: Variable and function names should not be longer than 30 characters.

subtitle_anova_parametric_repeated <- function(data,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

R/helpers_ggbetween_anova_subtitles.R:744:5: warning: local variable ‘effsize’ assigned but may not be used

effsize <- "omega"
    ^~~~~~~

R/helpers_ggbetween_anova_subtitles.R:796:10: style: Commented code should be removed.

#    effsize_ci_message(nboot = nboot, conf.level = conf.level)
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

R/helpers_ggbetween_t_subtitles.R:770:1: style: Lines should not be more than 100 characters.

#' (\url{https://www.uvm.edu/~dhowell/methods7/Supplements/Confidence\%20Intervals\%20on\%20Effect\%20Size.pdf}).
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

R/helpers_gghistostats.R:49:5: warning: local variable ‘label.value’ assigned but may not be used

label.value <- x_pos
    ^~~~~~~~~~~

tests/testthat/test_ggbetweenstats.R:178:7: style: Commented code should be removed.

# testthat::expect_identical(p$labels$subtitle, p_subtitle)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

@lintr-bot
Copy link

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

R/ggcorrmat.R:270:5: warning: local variable ‘corr.method.text’ assigned but may not be used

corr.method.text <- "Pearson"
    ^~~~~~~~~~~~~~~~

R/ggcorrmat.R:379:9: warning: local variable ‘n_summary’ assigned but may not be used

n_summary <- numdf_summary(corr_df$n)
        ^~~~~~~~~

R/ggscatterstats.R:215:5: style: Opening curly braces should never go on their own line and should always be followed by a new line.

​    {
    ^

R/helpers_ggbetween_anova_subtitles.R:282:1: style: Variable and function names should not be longer than 30 characters.

subtitle_friedman_nonparametric <- function(data,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

R/helpers_ggbetween_anova_subtitles.R:698:1: style: Variable and function names should not be longer than 30 characters.

subtitle_anova_parametric_repeated <- function(data,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

R/helpers_ggbetween_anova_subtitles.R:744:5: warning: local variable ‘effsize’ assigned but may not be used

effsize <- "omega"
    ^~~~~~~

R/helpers_ggbetween_anova_subtitles.R:796:10: style: Commented code should be removed.

#    effsize_ci_message(nboot = nboot, conf.level = conf.level)
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

R/helpers_ggbetween_t_subtitles.R:770:1: style: Lines should not be more than 100 characters.

#' (\url{https://www.uvm.edu/~dhowell/methods7/Supplements/Confidence\%20Intervals\%20on\%20Effect\%20Size.pdf}).
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

R/helpers_gghistostats.R:49:5: warning: local variable ‘label.value’ assigned but may not be used

label.value <- x_pos
    ^~~~~~~~~~~

tests/testthat/test_ggbetweenstats.R:178:7: style: Commented code should be removed.

# testthat::expect_identical(p$labels$subtitle, p_subtitle)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Please sign in to comment.