Update readtable.R