Запишите список, как показано в выводе консоли R, в текстовый файл.

У меня проблема с записью списка в текстовый файл в r. Вот мой код:

library(e1071)
mydata = read.table("TRAIN.txt", sep = ",", header = FALSE)
model <- naiveBayes(as.factor(V1) ~., data = my data)

и я хочу записать "модель" в текстовый файл. Вот формат "образца":

A-priori probabilities:
Y
   0        1 
0.703125 0.296875 

Conditional probabilities:
V2
Y         [,1]      [,2]
0  0.1327792 1.1571522
1 -0.1276267 0.9334735

V3
Y         [,1]      [,2]
0 -0.2414282 1.0982461
1 -0.2269481 0.7594525

и я попробовал следующее:

write(model, "TEST.txt")

и получил следующую ошибку:

Error in cat(list(...), file, sep, fill, labels, append) : 
argument 1 (type 'list') cannot be handled by 'cat'

а потом я попробовал

lapply(model, cat, file='test.txt', append=TRUE)

и получил ту же ошибку.


r lapply cat
person MTT    schedule 30.04.2015    source источник
comment
Вы хотите иметь возможность перезагружать модель из текстового файла? Или просто записать тот же вывод, который вы видите в консоли, в файл?   -  person MrFlick    schedule 30.04.2015
comment
Просто напишите тот же вывод, который я вижу в консоли. Я не хочу получать его позже.   -  person MTT    schedule 30.04.2015

Ответы (1)


arrow_upward
7
arrow_downward 

y1 <- rnorm(100)
x1 <- rnorm(100)
model.out <- lm(y1~x1)

sink("~/Desktop/TEST.txt", type=c("output", "message"))
model.out
sink(NULL)

На основе этого ответа: Как сохранить весь вывод консоли в файл в R?

person rbatt    schedule 30.04.2015