P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-07-12 05:02:03 +02:00
Code Releases Activity

(v1.2.0.9016) fix in rsi_calc()

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2020-06-26 10:21:22 +02:00
parent 033ca49817
commit b31003c0b6
21 changed files with 71 additions and 61 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
R/mic.R
View File

@ -130,7 +130,8 @@ as.mic <- function(x, na.rm = FALSE) {
}
all_valid_mics <- function(x) {
x_mic <- suppressWarnings(as.mic(x[!is.na(x)]))
x_mic <- tryCatch(suppressWarnings(as.mic(x[!is.na(x)])),
error = function(e) NA)
!any(is.na(x_mic)) & !all(is.na(x))
}