R - Collapse By Row

Question

Мне нужно свернуть мои данные по строке.

seq = structure(c("h", "d", "s", "s", "f", "k", "s", "s", "f", "d", 
"d", "d", "l", "l", "d", "d"), .Dim = c(4L, 4L), .Dimnames = list(
NULL, c("act1.055", "act1.056", "act1.057", "act1.058"))) 

Мои данные выглядят следующим образом:

 act1.055 act1.056 act1.057 act1.058 
[1,] "h"  "f"  "f"  "l"  
[2,] "d"  "k"  "d"  "l"  
[3,] "s"  "s"  "d"  "d"  
[4,] "s"  "s"  "d"  "d" 

Если я

paste(seq, collapse = "") 
[1] "hdssfkssfdddlldd" 

, который не то, что я хочу.

Что мне нужно

hffl 
dkdl 
ssdd 
ssdd 

В матрице, если это возможно.

Answer 1

matrix(apply(seq, 1, paste, collapse=''), ncol=1) 
#  [,1] 
#[1,] "hffl" 
#[2,] "dkdl" 
#[3,] "ssdd" 
#[4,] "ssdd" 

Answer 2

Другой вариант:

matrix(do.call(paste0, data.frame(seq))) 

Выход:

 [,1] 
[1,] "hffl" 
[2,] "dkdl" 
[3,] "ssdd" 
[4,] "ssdd"