SNOMED <- sampleSNOMED()
acronyms('Heart failure')
# Get all synonyms and acronyms
rva <- SNOMEDconcept('Right ventricular abnormality')
rbind(description(rva, include_synonyms = TRUE), acronyms(rva))
Run the code above in your browser using DataLab