r - 在一次调用中交换向量的两个元素

Question

我有一个矢量 c(9,6,3,4,2,1,5,7,8) ，我想切换向量中索引 2 和索引 5 处的元素。但是，我不想创建一个临时变量，并希望在一次调用中进行切换。我该怎么做？

Answer 1

只是x[c(i,j)] <- x[c(j,i)]怎么样？ ?类似于 replace(...) ，但也许更简单一些。

swtch <- function(x,i,j) {x[c(i,j)] <- x[c(j,i)]; x} 
swtch(c(9,6,3,4,2,1,5,7,8) , 2,5)
# [1] 9 2 3 4 6 1 5 7 8