如何在矢量的每个值之间写入逗号？

Question

我想用每个值之间的逗号将矢量导出到文件。我试图用paste与sep = ","，但它不起作用。有谁知道为什么？

> x <- rnorm(10) 
> paste(x, sep = ",") 
[1] "-1.08574649988891" "2.9580381152357" "-0.549880906960338" "1.79794352588269" "-1.06316832291584" "-1.56636513327118" "0.363867572492577" 
[8] "-0.644707355221403" "0.617827074223129" "-1.50892267338431" 

Answer 1

因为sep分隔物体; collapse分隔元素。

> paste(letters[1:3], 1:3, sep=",", collapse="|") 
[1] "a,1|b,2|c,3" 

Answer 2

试试这个：

> write.table(matrix(1:10, 1), sep = ",", row.names = FALSE, col.names = FALSE) 
1,2,3,4,5,6,7,8,9,10 

或本：

> cat(1:10, sep = ","); cat("\n") 
1,2,3,4,5,6,7,8,9,10 

还要注意，write.table和cat支持file=和append=参数。