Capture o status de saída e a saída de uma chamada do sistema em R

Eu brinco um pouco comsystem() esystem2() por diversão, e me ocorreu que eu posso salvar o status de saída ou saída em um objeto. Um exemplo de brinquedo:

X <- system("ping google.com",intern=TRUE)

me fornece a saída, enquanto

X <- system2("ping", "google.com")

me dá o status de saída (1 neste caso, o Google não aceita ping). Se eu quero tanto o status de saída quanto o de saída, tenho que fazer 2 chamadas de sistema, o que parece um pouco exagerado. Como posso obter os dois usando apenas uma chamada do sistema?

EDIT: eu gostaria de ter os dois no console, se possível, sem passar por um arquivo temporário usandostdout="somefile.ext" nosystem2 ligue e depois leia-o em.

questionAnswers(3)

yourAnswerToTheQuestion