排序非递减函数，然后在R

Question

需要基本R功能的帮助：

首先从4个不同的序列中排序非递减序列，然后将这4个序列排成一个。

我在编程时完全是绿色的，所以请尽量使用它。

Edit1：根据需要输入一些输入数据

A={3,2,1,2}
B={6,7,5,8}
C={12,11,9,10}
D={65,43,76,13}

我希望首先对每个序列进行排序，所以

A={1,2,2,3}
B={5,6,7,8}
C={9,10,11,12}
D={13,43,65,76}

然后将其合并

ABCD={1,2,2,4,5,6,7,8,9,10,11,12,13,43,65,76}

Answer 1

如果你想要一个带矢量A，B，C和D并输入和输出它们的排序版本的函数，你可以尝试：

sortAll <- function(A, B, C, D) sort(c(A, B, C, D))

然后你可以运行它：

A <- c(1,2,2,3)
B <- c(5,6,7,8)
C <- c(9,10,11,12)
D <- c(13,43,65,76)
sortAll(A, B, C, D)
# [1]  1  2  2  3  5  6  7  8  9 10 11 12 13 43 65 76

如果您想编写一个组合并排序任意数量输入的函数，您可以尝试：

sortAll <- function(...) sort(unlist(list(...)))
sortAll(A, B, C, D)
# [1]  1  2  2  3  5  6  7  8  9 10 11 12 13 43 65 76
sortAll(A)
# [1] 1 2 2 3