Some of the NBER ICD-9 MCOD files use rniflag_ as a column name while others use rnifla_. This function makes the names consistent (to rnifla_).
Examples
df <- data.frame(rniflag_1 = c(0, 1), record_1 = c("E850", "9650"))
rename_ni_flag(df)
#> rnifla_1 record_1
#> 1 0 E850
#> 2 1 9650