P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-07-08 20:41:58 +02:00
Code Releases Activity

is.rsi.eligible update

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2019-02-04 18:04:29 +01:00
parent 587e00b7be
commit 3d3366faf7
6 changed files with 71 additions and 222 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
R/rsi.R
View File

@ -57,7 +57,7 @@
#'
#' # default threshold of `is.rsi.eligible` is 5%.
#' is.rsi.eligible(WHONET$`First name`) # fails, >80% is invalid
#' is.rsi.eligible(WHONET$`First name`, threhold = 0.9) # succeeds
#' is.rsi.eligible(WHONET$`First name`, threshold = 0.9) # succeeds
as.rsi <- function(x) {
if (is.rsi(x)) {
x