icd (version 2.2)

icd_classes_conflict: Check whether there are any ICD class conflicts

Description

Some classes cannot be simultaneously true for one vector of ICD codes, e.g. ICD-9-CM and ICD-9 from the WHO. This function returns TRUE if there are any such combinations of incompatible classes. If the constructor functions such as icd9cm() and icd10() are used, this should never happen.

Usage

icd_classes_conflict(x)

Arguments

x

input object to test for class conflicts

Examples

# NOT RUN {
bad_codes <- c("100", "A01", "V100", "E999.0")
class(bad_codes) <- c("icd9", "icd10cm")
stopifnot(icd:::icd_classes_conflict(bad_codes))
# }
# NOT RUN {
# benchmark attributes vs attr for getting and setting
rp <- "a"
new_attr <- list(k = "b")
times <- 5e6
microbenchmark::microbenchmark(attr(rp, "k") <- "b", attributes(rp) <- new_attr, times = times)
microbenchmark::microbenchmark(attr(rp, "k"), attributes(rp)[["k"]], times = times)
microbenchmark::microbenchmark(attr(rp, "k"), attributes(rp), times = times)
microbenchmark::microbenchmark(attr(rp, "k", exact = TRUE), attributes(rp), times = times)
# }