como lê arquivo com scan em R