Прочитать в произвольном файле как строку, а затем сохранить обратно в файл? Всегда поврежден

Question

Я пытаюсь просто читать в произвольном файле в R в виде строки. Затем сохраните его в другом месте.

data = readLines("/path_to_file/") 
con = file("/new_path_to_file", "w") 
writeLines(data, con) 
close(con) 

Каждый раз, когда новый файл поврежден (тестирование с этим изображением: http://lacuadramagazine.com/wp-content/uploads/sangeh-monkey-forest-101.jpg).

Я также пробовал readChar, но в зависимости от файла, я получаю ошибку UTF-8.

Я хочу, чтобы иметь возможность делать это с любым файлом - изображение, текст и т. Д. Это часть более крупного анализа (поэтому file.copy не сокращает его), но я даже не могу получить базовый механизм чтения/записи. Должна быть простой, но в тупик.

Answer 1

Здесь вы работаете с двоичными данными, а не с символьными данными. Скорее всего, вы должны работать с

setwd("~/../Desktop") 
fn<-"sangeh-monkey-forest-101.jpg" 
img<-readBin(fn, raw(), file.info(fn)$size) 
writeBin(img, "out.jpg") 

Вы можете попробовать преобразовать в символ с функциями, как rawToChar(img) но так как строки R не может содержать нулевые значения (которые ваша не делает - which(img==0)) вы не можете представить это как правильно закодированную строку.