2013-11-28 66 views
0

我有一個非常大的關聯值表,我想保存在一個文件中。R:sink()在某些行中拆分表

這實際上做的事:

sink("/to/path/file.csv") 
cor(total) 
sink() 

該文件中寫入這樣的:

   a   b    c   d 
r    0.635391844 0.316249555 0.715476998 0.138705124 
y    1.000000000 0.245008313 0.927208342 0.109602263 
z    0.245008313 1.000000000 0.239142304 0.080837639 
t    0.927208342 0.239142304 1.000000000 0.131402452 
h    0.109602263 0.080837639 0.131402452 1.000000000 
e    0.996816365 0.247379819 0.930169663 0.108444557 
a    0.125584355 0.149714007 0.139603217 0.664041704 
a    0.245518153 0.318763442 0.252738479 0.337095547 
h    NA   NA    NA   NA 
h    0.016062787 0.006800213 0.012608729 -0.024936870 


       e    f   g      h 
a   -0.0671507332 -0.054941719 -0.081309861     NA 
a   -0.0088907191 -0.005160978 -0.024992979     NA 
a   -0.0136534885 -0.037814849 -0.050713280     NA 
a   -0.0045957748 -0.022862111 -0.044030999     NA 
a   -0.0097176798 -0.046629114 -0.106266022     NA 

我想這列A,C,d,F,G,H ...其中在同一行。 我也嘗試下沉(「路徑」,拆分= T),但它不起作用,

建議?

謝謝。

卡洛斯

+0

是否運行'選項(寬度= 200)'預先工作? – gung

+2

你有避免使用'write.csv'的原因嗎? – Dason

回答

0

像這樣,例如:

m <- cbind(read.csv("/to/path/file.csv", cor(total)) 
write.csv(m,"/to/path/file.csv") 
+0

謝謝你的幫助。 但是,我收到以下錯誤消息: m < - cbind(read.csv(「/ home/j/roo.csv」,cor(tot_num))) Erreur dans read.table(file = file, header = header,sep = sep,quote = quote,: 輸入中沒有可用的行 – Kaervas