连接R中的X行数

Question

我有不同数量的行和列；并且希望将每一行连接到一个长行(最好使用tidyverse)。请参阅下面的示例数据。

#Example data 1:

x <- as_tibble(matrix(1:9, ncol=3))

#wanted:
  x = c(1,4, 2, 5, 8, 3, 6, 9)


#Example data 2: 
x <- as_tibble(matrix(1:10, ncol=2))

#wanted:
  x = c(1, 6, 2, 7, 3, 8, 4, 9, 5, 10)

提前谢谢。

Answer 1

我们可以转接和连接

c(t(x))

Answer 2

我认为，@akrun的解决方案是最简单的。这里有一个更复杂的解决办法:P

> unlist(split(x,1:nrow(x)),use.names = FALSE)
[1] 1 4 7 2 5 8 3 6 9