P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-09-05 23:29:44 +02:00
Code Releases Activity

(v1.2.0.9011) mo_domain(), improved error handling

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2020-06-22 11:18:40 +02:00
parent e88d7853f5
commit 93a158aebd
49 changed files with 523 additions and 590 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
R/pca.R
View File

@@ -61,9 +61,8 @@ pca <- function(x,
tol = NULL,
rank. = NULL) {
if (!is.data.frame(x)) {
stop("this function only takes a data.frame as input")
}
stop_ifnot(is.data.frame(x), "`x` must be a data.frame")
stop_if(any(dim(x) == 0), "`x` must contain rows and columns")
# unset data.table, tibble, etc.
# also removes groups made by dplyr::group_by