sink()와 비슷한 cat() 함수

cat() 함수는 숫자나 문자를 결합하여 출력하는데, 다음과 같이 외부 결과 출력용으로도 응용할 수 있습니다.

> connect <- file("result.txt", "w")     # 파일 설정
> x <- iris$Sepal.Length
> cat(summary(x), file = connect)        # summary 함수의 결과를 파일에 기록
> close(connect)                         # 파일 종료

워킹 디렉터리 내에 생성된 result.txt 파일을 열어 보면 다음 그림과 같은 내용이 저장되어 있습니다.

그림 6-32 | cat() 함수를 사용하여 저장한 출력 결과

sink() 함수는 콘솔 창에 출력되는 모든 결과가, cat() 함수는 출력을 원하는 변수의 결과가 외부 파일로 만들어진 것을 알 수 있습니다. 상황에 따라 적절히 선택하여 사용합니다.