attr_decimal_diag: Set ICD short-form diagnosis code attribute

In jackwasey/icd: Comorbidity Calculations and Tools for ICD-9 and ICD-10 Codes

Set ICD short-form diagnosis code attribute

Description

Doing this in an R function doesn't work for 'void' equivalent, and does a copy if the updated object is returned.

Usage

attr_decimal_diag(x, value = TRUE)

Examples

j <- "100"
attr(j, "icd_short_diag") <- TRUE
j
attr(j, "icd_short_diag") <- FALSE
j
icd:::attr_decimal_diag(j)
as.decimal_diag(j)
# if pryr is installed, use address and refs to see what is going on

jackwasey/icd documentation built on Dec. 22, 2024, 4:47 a.m.