行列などのタブ区切り出力 の変更点

• 追加された行はこの色です。
• 削除された行はこの色です。
• 行列などのタブ区切り出力 は削除されています。
• 行列などのタブ区切り出力 の差分を削除

COLOR(red){SIZE(30){行列などをタブ区切りで出力する関数}}
//青木繁伸 Jul 13, 2003

次の関数 COLOR(red){data.list} は行列, データフレームをタブで区切って出力する。出力をコピーアンドペーストで Excel 等に持っていくときに便利かな？
//非常に便利ですね。-林　啓一

どうということのない単純な関数。

#contents

-参考リンク~
反対に読み込みは[[Windows版Excelからのセル範囲コピー:http://www.okada.jp.org/RWiki/index.php?%BD%E9%B5%E9%A3%D1%A1%F5%A3%C1%20%A5%A2%A1%BC%A5%AB%A5%A4%A5%D6(2)#content_1_32]]

*関数のコード [#i5e4cbbe]

 data.list <- function(d)
 {
 	cat(paste(t(d), c(rep("\t", ncol(d)-1), "\n")), sep="")
 }

*使用例 [#p44d8aa0]

 > x <- matrix(1:15, nr=5)

 > x
      [,1] [,2] [,3]
 [1,]    1    6   11
 [2,]    2    7   12
 [3,]    3    8   13
 [4,]    4    9   14
 [5,]    5   10   15

 > data.list(x)
 1 	6 	11 
 2 	7 	12 
 3 	8 	13 
 4 	9 	14 
 5 	10 	15 

行列の部分書き出し
 > data.list(x[2:4,c(1,3)]) # 2~4行、1,3列のみ書き出し
 2       12 
 3       13 
 4       14