加载R包 library(openxlsx) 写一个保存为Excel表格的函数 #设置一个保存表格函数save_excel_with_style<-function(data_frame,file_name){# 创建一个Arial字体的样式arial_style<-createStyle(fontName="Arial",fontSize=10,halign="center")# 创建一个标题样式title_style<-createStyle(fontName="Arial",fontSiz...