.csvファイルとしてエクスポートする前に2つのデータフレームを結合します。

Question

私は大きなアンケートに取り組んでいます。異なる質問（例：df1とdf2）の要約頻度表を作成しています。しかし、

write.csv(df1 ,file="df2.csv") 

私のアンケートは、多くの質問、したがって、データフレームを持っているとして、Rに中道がある場合、私は思っていた：

a<-c(1:5) 
b<-c(4,3,2,1,1) 
Percent<-c(40,30,20,10,10) 
df1<-data.frame(a,b,Percent) 
c<-c(1,1,5,2,1) 
Percent<-c(10,10,50,20,10) 
df2<-data.frame(a,c,Percent) 
rm(a,b,c,Percent) 

私は通常、次のコマンドを使用してCSVファイルとしてデータフレームをエクスポート異なるデータフレームを結合して（例えば、それらを分ける線で）、それらをcsvにエクスポートします（そして、最終的にはExcelで開きます）。私がExcelを開くと、質問データフレームがすべて1つのファイルが1つだけ表示されます。この1つのCSVファイルは、結果を表示するために順番に開く必要がある個々のファイルを持つよりもはるかに簡単です。

事前に感謝します。

Answer 1

最終目標がExcelスプレッドシートの場合は、xlsファイルを直接書き込むためにRで利用できるいくつかのツールを検討します。個人的には、私はXLConnectパッケージを使用していますが、xlsxといくつかのwrite.xls関数もさまざまなパッケージに浮かんでいます。

それはちょうどこのような状況ではいくつかの便利なベクトル化することができますので、私はXLConnectを好きに起こる：それ以外の場合は、各データフレームの列ヘッダーを書きますので、私はheader = FALSEを指定

require(XLConnect) 

#Put your data frames in a single list 
# I added two more copies for illustration 
dfs <- list(df1,df2,df1,df2) 

#Create the xls file and a sheet 
# Note that XLConnect doesn't seem to do tilde expansion! 
wb <- loadWorkbook("/Users/jorane/Desktop/so.xls",create = TRUE) 
createSheet(wb,"Survey") 

#Starting row for each data frame 
# Note the +1 to get a gap between each 
n <- length(dfs) 
rows <- cumsum(c(1,sapply(dfs[1:(n-1)],nrow) + 1)) 

#Write the file 
writeWorksheet(wb,dfs,"Survey",startRow = rows,startCol = 1,header = FALSE) 
#If you don't call saveWorkbook, nothing will happen 
saveWorkbook(wb) 

。しかし、最後にxlsファイルの一番上に一行を追加することはあまり追加作業ではありません。

Answer 2

ジェームズはコメントとして、あなたは

merge(df1, df2, by="a") 

を使用することができますが、それは、水平方向のデータを組み合わせるでしょう。あなたが縦にそれらを結合したい場合は、rbindを使用することができます。

rbind(df1, df2, df3,...) 

（注：列名が作業にrbindために一致する必要があります）。