Захватывайте как статус выхода, так и вывод системного вызова в R

Я немного поигрался с system () и system2 () ] для удовольствия, и меня поразило, что я могу сохранить либо вывод, либо статус выхода в объекте. Игрушечный пример:

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

дает мне результат, тогда как

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

дает мне статус выхода (1 в данном случае, google не принимает ping). Если мне нужен и вывод, и статус выхода, мне нужно сделать 2 системных вызова, что кажется немного излишним. Как я могу получить и то, и другое, используя только один системный вызов?

РЕДАКТИРОВАТЬ: Я хотел бы иметь оба в консоли, если возможно, не просматривая временный файл, используя stdout = "somefile.ext" в вызове system2 и затем считывая его.