[R] createWorkbook 함수를 이용해 데이터프레임 변수를 엑셀에 저장하기

코드

1. Workbook 생성 및 엑셀 시트 추가하기.

# createWorkbook
# install.packages('openxlsx')

library(openxlsx)

example <- createWorkbook("example")

a <- iris
b <- mtcars

addWorksheet(example, "a")
addWorksheet(example, "b")

example

'''Console'''
> example
A Workbook object.
 
Worksheets:
 Sheet 1: "a"
 

 Sheet 2: "b"
 

 
 Worksheet write order: 1, 2

 

2. 생성된 엑셀 시트에 데이터프레임 입력.

writeDataTable(example,"a",a)
writeDataTable(example,"b",b)

# 파일로 저장
saveWorkbook(example, file="example.xlsx")

 

사용 예시

위의 패키지를 이용하여 데이터 명세(상세) 엑셀 파일을 만들어 저장해둘 때 사용해도 괜찮을 듯하다.

a = iris

a_col = colnames(a)
a_col_info = c('꽃받침의 길이','꽃받침의 너비','꽃잎의 길이','꽃잎의 너비','붓꽃의 종')
a_col_type = c('num','num','num','num','Factor')

a_data_info = data.frame('컬럼명'=a_col,'의미'=a_col_info,'데이터 타입'=a_col_type)

data_schema_vf <- createWorkbook("data_schema_vf")
addWorksheet(data_schema_vf, "data_info")
writeDataTable(data_schema_vf,"data_info",a_data_info)

saveWorkbook(data_schema_vf, file="data_schema_vf.xlsx")

 

위의 코드로 생성된 엑셀파일