cat добавляет CR к выводу в R

Question

Я прочитал в текстовом файле, который в глобальной среде выглядит хорошо:

Примечание: я нахожусь на окнах, иразрывы строк: \ r \ n.

Похоже, что он был правильно прочитан, потому что если я смотрю на текстовый файл в блокноте ++, я вижу символы:

Однако, если я пытаюсь записать файл обратно, используя cat, я получаю дополнительные {CR} байты, добавленные:

cat(txtFile, file="out.txt", append="FALSE")

Это приводит к тому, что результирующий текстовый файл отображается с двойным интервалом.Очень раздражает, и я не знаю, почему cat() делает это.Я также пытался writeLines, но всякий раз, когда он пытается записать строку в файл, он просто ставит {CR} перед {CRLF}.

Кто-нибудь знает, как остановить это поведение?

Answer 1

Решение здесь было похоже на ответ, найденный здесь: R: Получение Unix-подобного перевода строки LF при записи файлов с помощью cat ()

    f<-file("out.txt", open="wb");
    cat(txtFile,file=f,sep="");
    close(f);

Результирующий вывод текстового файла в notepad ++: