if (FALSE) {
# create random matrix
rand_mat = matrix(runif(16), ncol = 4)
# put it on the new worksheet
xln[a1] = rand_mat
# set bold font, format numbers as percent and align it
cr[a1] = xl.property(Font.Bold = TRUE,
NumberFormat = "0.00%",
HorizontalAlignment = xl.constants$xlCenter
)
}
Run the code above in your browser using DataLab