como lê arquivo com read.fwf em R