Присвоение `comment ()` для объекта R из файла .txt

Question

Я пытаюсь назначить комментарий для фрейма данных, чтобы сохранить некоторые соответствующие метаданные. У меня есть неструктурированный текстовый файл, заключенный в кавычки, с несколькими переносами строк ('\ n').

WHO_comment<-read.table(file="WHO comment.txt", sep="\t")
comment(WHO)<-WHO_comment #Read in the comment from .txt due to its length
cat(comment(WHO)) #Database metadata

Однако считывание происходит в одном большом блоке с символом '\ n', читаемым как буквенные строки. Преобразование его в as.character() возвращает только имя строки (т. Е. '1').

Как правильно прочитать этот файл?

Answer 1

read.table - неправильная функция для чтения текстового файла. Как следует из названия, его целью является чтение табличных данных. Чтобы прочитать текстовый файл, используйте readLines, а затем вставьте отдельные строки вместе:

comment(data) = paste(readLines('WHO comment.txt'), collapse = '\n')

Answer 2

Решено - мне нужно использовать stringsAsFactors=FALSE, чтобы правильно прочитать файл. Этот код теперь делает то, что я хотел, чтобы назначить комментарий из файла .txt.

WHO_comment<-read.table(file="WHO comment.txt", sep="\t",stringsAsFactors=FALSE)
comment(WHO)<-WHO_comment #Read in the comment from .txt due to its length
cat(comment(WHO)) #Database metadata