R module implementing various medical risk scores using ICD-9 codes