diff --git a/DESCRIPTION b/DESCRIPTION index 2a96c41..9465145 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: cpmr Title: Connectome Predictive Modelling in R -Version: 0.0.9.9000 +Version: 0.1.0 Authors@R: person("Liang", "Zhang", , "psychelzh@outlook.com", role = c("aut", "cre"), comment = c(ORCID = "0000-0001-9041-1150")) diff --git a/NEWS.md b/NEWS.md index a1ecabd..4c84c38 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,9 +1,9 @@ -# cpmr (development version) +# cpmr 0.1.0 ## New features -* Added `summary()` method to summarize the results of the CPM analysis. -* Added `tidy()` method to tidy the results of the CPM analysis. +* Added `summary()` method to summarize the results of the CPM analysis (#8). +* Added `tidy()` method to tidy the results of the CPM analysis (#10). * Support `na_action` argument in `cpm()` function to handle missing values in the input data (#2). ## Enhancements diff --git a/R/cpm.R b/R/cpm.R index f8142b8..f84fb4f 100644 --- a/R/cpm.R +++ b/R/cpm.R @@ -133,10 +133,10 @@ cpm <- function(conmat, behav, ..., exclude = Reduce( function(x, y) intersect(x, y), list( - which(complete.cases(conmat)), - which(complete.cases(behav)), + which(stats::complete.cases(conmat)), + which(stats::complete.cases(behav)), if (!is.null(confounds)) { - which(complete.cases(confounds)) + which(stats::complete.cases(confounds)) } else { seq_along(behav) } @@ -225,7 +225,7 @@ print.cpm <- function(x, ...) { cat(" Call: ") print(x$call) cat(sprintf(" Number of observations: %d\n", length(x$real))) - cat(sprintf(" Complete cases: %d\n", sum(complete.cases(x$pred)))) + cat(sprintf(" Complete cases: %d\n", sum(stats::complete.cases(x$pred)))) if (!is.null(x$edges)) { cat(sprintf(" Number of edges: %d\n", dim(x$edges)[1])) } else { diff --git a/R/tidy.R b/R/tidy.R index dfccb24..29f447b 100644 --- a/R/tidy.R +++ b/R/tidy.R @@ -7,7 +7,7 @@ generics::tidy #' @param x A `cpm` object. #' @param ... Additional arguments passed to `summary()`. #' @param component A character vector indicating the component to tidy. -#' @return A [tibble][tibble-package] with columns storing parameters of the +#' @return A [tibble][tibble::tibble-package] with columns storing parameters of the #' [cpm()] object and further columns depending on the `component` argument: #' #' For `component = "performance"`: diff --git a/cran-comments.md b/cran-comments.md index d6a0fba..b21fce6 100644 --- a/cran-comments.md +++ b/cran-comments.md @@ -1,15 +1,3 @@ ## R CMD check results -0 errors | 0 warnings | 1 note - -* This is a new release. - -The NOTE is as follows: - -``` -❯ checking for non-standard things in the check directory ... NOTE - Found the following files/directories: - ''NULL'' -``` - -As noted in [this issue](https://github.com/r-hub/rhub/issues/560), this is a known issue with the `rhub` package and can be safely ignored. +Use `devtools::check_win_devel()` shows no errors, warnings and notes. diff --git a/man/tidy.cpm.Rd b/man/tidy.cpm.Rd index 4cfdff0..eb4e0c8 100644 --- a/man/tidy.cpm.Rd +++ b/man/tidy.cpm.Rd @@ -14,7 +14,7 @@ \item{component}{A character vector indicating the component to tidy.} } \value{ -A \link[=tibble-package]{tibble} with columns storing parameters of the +A \link[tibble:tibble-package]{tibble} with columns storing parameters of the \code{\link[=cpm]{cpm()}} object and further columns depending on the \code{component} argument: For \code{component = "performance"}: