1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-09 13:42:04 +02:00

(v0.9.0.9022) inheritance fix

This commit is contained in:
2020-02-10 14:18:15 +01:00
parent b4356a299c
commit 5a98e6b777
13 changed files with 15 additions and 15 deletions

View File

@ -81,7 +81,7 @@ as.disk <- function(x, na.rm = FALSE) {
#' @export
#' @importFrom dplyr %>%
is.disk <- function(x) {
inherits(x, c("disk", "integer"))
inherits(x, "disk")
}
#' @exportMethod print.disk

View File

@ -130,7 +130,7 @@ as.mic <- function(x, na.rm = FALSE) {
#' @export
#' @importFrom dplyr %>%
is.mic <- function(x) {
inherits(x, c("mic", "factor"))
inherits(x, "mic")
}
#' @exportMethod as.double.mic

View File

@ -346,7 +346,7 @@ as.rsi.data.frame <- function(x, col_mo = NULL, guideline = "EUCAST", ...) {
#' @rdname as.rsi
#' @export
is.rsi <- function(x) {
inherits(x, c("rsi", "factor"))
inherits(x, "rsi")
}
#' @rdname as.rsi