要洗牌两个列表并合并到一个列表中

Question

我想将两个列表合并为一个   例如：

    A  B
    3  7
    1  8
    9  2
    31 4

期望的答案：

    A
    3
    8
    9
    4

如果有人能告诉我这个查询的代码会有帮助吗？

Answer 1

如果A和B是向量：

A[c(FALSE, TRUE)] <- B[c(FALSE, TRUE)]
A

[1] 3 8 9 4

如果A和B是数据frEMe的列（从打印输出判断出来的情况）

DF$A[c(FALSE, TRUE)] <- DF$B[c(FALSE, TRUE)]
DF

  A B
1 3 7
2 8 8
3 9 2
4 4 4

Answer 2

A[seq(1:(length(A)/2))*2] <- B[seq(1:(length(A)/2))*2]