R-按行折叠
我需要按行折叠数据R-按行折叠,r,paste,collapse,R,Paste,Collapse,我需要按行折叠数据 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 act
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
如果可能,在矩阵中 另一种选择:
matrix(apply(seq, 1, paste, collapse=''), ncol=1)
# [,1]
#[1,] "hffl"
#[2,] "dkdl"
#[3,] "ssdd"
#[4,] "ssdd"
matrix(do.call(paste0, data.frame(seq)))
输出:
[,1]
[1,] "hffl"
[2,] "dkdl"
[3,] "ssdd"
[4,] "ssdd"
很乐意帮忙!Quicknote:避免在函数后命名变量。可能会出现混乱。也许我们需要一个
行粘贴
函数?@bondedust-当然!