r - スペースなしの 0-1 シーケンス

Question

バイナリ シーケンスを報告する場合、スペースは冗長です。このコード

x <- '1 0 0 0 0 0 1 1 0 1 0 1 1 0 '
y<-gsub(' +', '', x)

Rからコピーして貼り付けることができるように仕事をします。他の形式の0-1シーケンス（および他の1桁のデータ）に対して同じことを行うにはどうすればよいですか。

x <- c(1, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 1, 1, 0)

また

toString(x)

または何でも（さまざまなオプションを学ぶために）？ありがとう。

Answer 1

For vectors, use the paste() function and specify the collapse argument:

x <- c(1, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 1, 1, 0)
paste( x, collapse = '' )

[1] "10000011010110"

Answer 2

やってみました

write.table(x,row.names=FALSE,col.names=FALSE,eol="\t")
1   0   0   0   0   0   1   1   0   1   0   1   1   0   

eol (行末) 文字を変更することで、使用するかどうか、および使用する区切り文字を決定できます。