R functions to read in an E-AIM table