Вы можете использовать функцию приемника () для передачи вывода R на внешнее соединение.
Эта функция полезна, поскольку позволяет легко экспортировать строки символов или фреймы данных в файл CSV или текстовый файл.
Эта функция использует следующий базовый синтаксис:
#define file name
sink(" my_data.txt ")
#write this text to file
"here is some text"
#close the external connection
sink()
В следующих примерах показаны три различных способа использования этой функции на практике.
Пример 1. Использование функции «sink()» для экспорта строки в текстовый файл
Мы можем использовать следующую функцию sink() для экспорта строки символов в текстовый файл:
#define file name
sink(" my_data.txt ")
#write this text to file
"here is some text"
#close the external connection
sink()
Затем мы можем перейти в текущий рабочий каталог и открыть текстовый файл:

Файл содержит указанную нами строку.
Мы также можем экспортировать несколько строк символов в текстовый файл:
#define file name
sink(" my_data.txt ")
#write several strings to file
"first text"
"second text"
"third text"
#close the external connection
sink()
Затем мы можем перейти в текущий рабочий каталог и открыть текстовый файл:

Файл содержит три строки, которые мы указали.
Пример 2. Использование функции «sink()» для экспорта фрейма данных в текстовый файл
Мы можем использовать следующую функцию sink() для экспорта фрейма данных в текстовый файл:
#define file name
sink(" my_data.txt ")
#define data frame to write to file
df <- data.frame(player=c('A', 'B', 'C', 'D','E'),
points=c(12, 29, 24, 30, 19),
assists=c(5, 5, 7, 4, 10))
print(df)
#close the external connection
sink()
Затем мы можем перейти в текущий рабочий каталог и открыть текстовый файл:

Файл содержит фрейм данных, который мы создали.
Пример 3. Использование функции «sink()» для экспорта фрейма данных в файл CSV
Мы можем использовать следующую функцию sink() для экспорта фрейма данных в CSV-файл:
#define file name
sink(" my_data.csv ")
#define data frame to write to file
df <- data.frame(player=c('A', 'B', 'C', 'D','E'),
points=c(12, 29, 24, 30, 19),
assists=c(5, 5, 7, 4, 10))
print(df)
#close the external connection
sink()
Затем мы можем перейти в текущий рабочий каталог и открыть файл CSV:

Файл CSV содержит созданный нами фрейм данных.
Дополнительные ресурсы
В следующих руководствах объясняется, как выполнять другие распространенные задачи в R:
Как экспортировать фрейм данных в файл Excel в R
Как экспортировать фрейм данных в файл CSV в R