我有一个向量,其中元素按行排列,但现在我想改变这些元素的顺序。我该如何只用一行代码实现呢?
# 1.create queue
queue <- c("James", "Mary", "Steve", "Alex", "Patricia")
queue
# 2.move Patricia to be in front of Steve
???
我是R语言的初学者,希望你们的回答能够简单易懂一些!谢谢!
我有一个向量,其中元素按行排列,但现在我想改变这些元素的顺序。我该如何只用一行代码实现呢?
# 1.create queue
queue <- c("James", "Mary", "Steve", "Alex", "Patricia")
queue
# 2.move Patricia to be in front of Steve
???
我是R语言的初学者,希望你们的回答能够简单易懂一些!谢谢!
我的moveMe
函数(在我的SOfun软件包中)非常适合这种情况。一旦加载了该软件包,您可以使用以下命令进行操作:
library(SOfun)
queue <- c("James", "Mary", "Steve", "Alex", "Patricia")
moveMe(queue, "Patricia before Steve")
# [1] "James" "Mary" "Patricia" "Steve" "Alex"
moveMe(queue, "Patricia before Steve; James last")
# [1] "Mary" "Patricia" "Steve" "Alex" "James"
moveMe(queue, "Patricia before Steve; James last; Mary after Alex")
# [1] "Patricia" "Steve" "Alex" "Mary" "James"
移动选项包括:"first"(移到开头)、"last"(移到末尾)、"before"(移到指定值前面)和"after"(移到指定值后面)。
可以通过用逗号分隔它们来将多个值移动到一个位置。例如,要将"Patricia"和"Alex"按重新排序的顺序移到"Mary"之前,然后将"Steve"移动到队列开头,您可以使用以下代码:
moveMe(queue, "Patricia, Alex before Mary; Steve first")
# [1] "Steve" "James" "Patricia" "Alex" "Mary"
你可以使用以下方式安装SOfun:
library(devtools)
install_github("SOfun", "mrdwab")
## Create a vector without "Patricia"
x <- setdiff(queue, "Patricia")
## Use `match` to find the point at which to insert "Patricia"
## Use `append` to insert "Patricia" at the relevant point
x <- append(x, values = "Patricia", after = match("Steve", x) - 1)
x
# [1] "James" "Mary" "Patricia" "Steve" "Alex"
append(setfiff)
解决了我的问题。 - Chris完成这个任务的一种方法是:
queue <- queue[c(1,2,5,3,4)]
但这种方法是手动的,不太通用。基本上,你需要通过说明如何重新排序当前索引来重新排序向量。
如果你想按字母顺序对队列进行排序(这样Patricia就会排在Steve前面):
queue <- sort(queue)
我认为你的意图是让这更加优雅,但是你的问题并没有具体说明如何做到。不过为了简单起见,只需重新编写queue
的定义即可。
queue <- c("James", "Mary", "Patricia", "Steve", "Alex")