install.packages
(
"writexl"
)
library
(writexl)
data_frame <-
data.frame
(
"Roll_Number"
<-
c
(1,2,3,4,5,6,7,8,9,10),
"Age"
<-
c
(18,19,20,19,18,17,18,19,17,16),
"Marks"
<-
c
(98,96,89,90,75,35,88,92,78,94))
writexl::
write_xlsx
(data_frame,
"Documents\\Sample.xlsx"
,
col_names=
TRUE
,
format_headers=
TRUE
,
use_zip64=
FALSE
)