R code to calculate elixhauser comorbidity score

Hello,

I need to calculate elixhauser comorbidity score using ICD9 code. I can 
find SAS code for the calculation online, but not R code.
If you wrote the R code or are aware of existence of this kind of R 
code, could you please let me know?

Thanks!
Qingxia (Cindy) Chen