Как написать запятую между каждым значением вектора?

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 и поддержки catfile= и append= аргументы.