How to concatenate strings in a specified order

Tried to concatenate strings diagonally from this post how to alternatively concatenate 3 strings, but was not successful.

My input is:

a<-c("a1","a2","a3")
b<-c("b1","b2","b3")
c<-c("c1","c2","c3")

My expected output would be

   "a1" "b2" "c3" "a2" "b3" "a3"

How to get the above from

  c(rbind(a,b,c))  

在将较低对角线设置为丢失后,如何按行和列的派生值对向量排序

mat <- rbind(a,b,c)

mat[lower.tri(mat)] <- NA
na.omit(mat[order(col(mat) - row(mat))])

One way would be to tweak Mark's solution

as.vector(na.omit(c(sapply(1:3, function(i) c(a[i], b[i+1], c[i+2])))))
#[1] "a1" "b2" "c3" "a2" "b3" "a3"

Also,

 vec1 <- c(a,b,c)
 indx <- seq(1,length(vec1), by=4)+rep(0:2,each=3)
 indx1 <- indx[indx <= length(vec1)]
 vec1[indx1[-length(indx1)]]
 #[1] "a1" "b2" "c3" "a2" "b3" "a3"
链接地址: http://www.djcxy.com/p/4232.html

上一篇: 用R中的随机值创建一个100数字向量,取整为2位小数

下一篇: 如何以指定的顺序连接字符串