原始数据如下格式
group M
A01 B01
A01 B02
A01 B04
A02 B09
A02 B01
A03 B03
A04 B09

用xx<-aggregate(data=dat,S~factor(group),FUN=function(x) list(x))汇总成下面的结果
> xx  
factor(group)             S
1           A01 B01, B02, B04
2           A02      B09, B01
3           A03           B03
4           A04           B09

请问各位大神，如何用将上面的结果输出到表格呢？用wrtie.csv(xx,"results.csv",row.names=F)行不通。