Захват вывода из функции shell ()

Question

Мне нужно вызвать некоторые команды оболочки, используя R. Мне также нужно захватить вывод этой команды (она выводится на консоль R). К сожалению capture.output не работает.

> shell("test")
'test' is not recognized as an internal or external command,
operable program or batch file.
Warning message:
In shell("test") : 'test' execution failed with error code 1

Мне нужно захватить эту часть:

'test' is not recognized as an internal or external command,
operable program or batch file.

Кто-нибудь из Вас знает, как решить эту проблему?

Answer 1

Просто используйте intern = TRUE:

out <- shell("test", intern = TRUE)
out
#[1] "'test' is not recognized as an internal or external command,"
#[2] "operable program or batch file."                             
#attr(,"status")
#[1] 1