openxlsx_write_data_frame.r

# Function to write data.frame to xlsx spreadsheet
write_xlsx <- function(data, file, sheetname = "Sheet1", rowNames = TRUE, ...) {
    require("openxlsx")
    wb <- createWorkbook()
    addWorksheet(wb, sheetname)
    writeData(wb, sheetname, data, rowNames = rowNames, ...)
    saveWorkbook(wb, file = file, overwrite = TRUE)
}

# Example
# data(cars)
# write_xlsx(cars, "cars.xlsx")