Doing this in an R function doesn't work for 'void' equivalent, and does a copy if the updated object is returned.
1 | attr_decimal_diag(x, value = TRUE)
|
1 2 3 4 5 6 7 8 | 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
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.