2017-07-08 70 views
2

我有兩張表,我已經使用write.table使用append參數寫入了excel,但是這兩個表都是一個一個來的,但我希望它們在它們之間留下一兩個空行。 我使用這個命令:在添加空行時插入空行

write.table(df1, file = "filename.csv",sep = ", ",row.names=FALSE,append=TRUE) 
write.table(df2, file = "filename.csv",sep = ", ",row.names=FALSE,append=TRUE) 

他們是如何來:

Gender Col1 Col2 
Male 18 13 
Female 3 3 
Grids Col1 Col2 
6 to 12  2 0 
12 to 24 6 6 

我多麼希望他們追加:

Gender Col1 Col2 
Male 18 13 
Female 3 3 

Grids  Col1 Col2 
6 to 12  2 0 
12 to 24 6 6 

即有空白的行空間之間。我應該怎麼做?

回答

2

我們在第一個數據集

df1 <- rbind(df1, setNames(replicate(3, "", simplify = FALSE), names(df1))) 

創建一個行,然後執行write.table

write.table(df1, file = "filename.csv",sep = ", ",row.names=FALSE,append=TRUE, quote = FALSE) 
write.table(df2, file = "filename.csv",sep = ", ",row.names=FALSE,append=TRUE, quote = FALSE) 

我們打開文件得到的輸出是

enter image description here

+0

謝謝許多。我是R的初學者,所以你可以告訴我setNames的功能是什麼,裏面給出的參數是什麼?那「3」是什麼意思? –

+0

@PraveenSingh setNames用於命名'list'。我們希望與'df1'具有相同的列數,所以我使用'3',而不是'ncol(df1)' – akrun

+0

@PraveenSingh您也可以勾選[here](https://stackoverflow.com/幫助/別人答案) – akrun