print.icd9: Print ICD codes and comorbidity maps cleanly

Description Usage Arguments Examples

View source: R/class.R

Description

Print ICD codes and comorbidity maps cleanly

Usage

1
2
3
4
5
## S3 method for class 'icd9'
print(x, verbose = FALSE, ...)

## S3 method for class 'icd10'
print(x, verbose = FALSE, ...)

Arguments

x

ICD codes to be printed

verbose

Annotate based on code attributes, e.g., decimal versus short codes.

...

arguments passed on to other functions

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
x <- structure(
  c("40201", "2258", "7208", "25001", "34400", "4011", "4011", NA),
  class = c("icd9cm", "icd9", "character"),
  icd_short_diag = TRUE
)
## Not run: 
print(x)
print(x, verbose = TRUE)
# as.factor drops any 'icd' classes
print(as.factor(x), verbose = TRUE)

## End(Not run)
## Not run: 
u <- uranium_pathology[1:10, "icd10"]
print(u)
print(u, verbose = TRUE)
# as.character will unclass the 'icd' classes
print(as.character(u), verbose = TRUE)
a <- structure(c("R21", "Z21"),
  class = c("icd10cm", "icd10", "character")
)
print(a, verbose = TRUE)

## End(Not run)

jackwasey/icd documentation built on Nov. 23, 2021, 9:56 a.m.