2017-06-15 83 views
0

我打算將數據保存到.xlsx文件,並將第i列的字體設置爲'Courier New'。將數據寫入指定字體的.xlsx文件中

c = matrix (rnorm (20), nrow= 4) 

爲.xlsx格式文件,並將'Courier New'設置爲第二列的字體。

write.xlsx (c, '1.xlsx') 

但是如何設置我的R腳本中的字體?

預先感謝您。

+0

不要忘了在你的文章中包含你使用的軟件包(而不是註釋)。有許多包含'write.xlsx'函數的包。 – lmo

+0

我不確定R包是否可以處理這個問題,但是如果他們不這樣做,你可以從R運行一個shell腳本actionning vba代碼,你會在其他xlsm工作簿中存儲 –

回答

0

您可以使用openxlsx軟件包來執行此操作。

library(openxlsx) 

wb <- createWorkbook() 

df <- data.frame(a = c(1:10), b = c(11:20), c = c("A", "A", "B", "B", "B")) 

addWorksheet(wb, 'new sheet') 

writeData(wb, sheet = "new sheet", df) 

my_style <- createStyle(fontName = 'Arial') 

addStyle(wb, 'new sheet', my_style, rows = 1:nrow(df), cols = 2) 

saveWorkbook(wb, file = 'example.xlsx') 

createStyle還可以讓您控制更多的選項。 看看這裏:https://cran.r-project.org/web/packages/openxlsx/openxlsx.pdf

+0

謝謝。有效。 – biofan