require(foreign) dados<-read.epiinfo('Astorga.rec')