我是Rcpp的新人。我需要按照另一个向量A
的顺序重新排列向量B
;
例如,
A=c(0.5,0.4,0.2,0.9)
B=c(9,1,3,5)
我想通过Rcpp制作C=c(0.4,0.2,0.9,0.5)
。
我知道简单的r代码C=A[order(B)]
,但我必须使用Rcpp代码。
我找到了如何使用B
查找sort_index
的顺序,但我未能就A
的订单安排B
。
我该怎么做?
答案 0 :(得分:2)
您应该可以使用arma::sort_index
来表示这一点,您在帖子中提到了这一点:
#include <RcppArmadillo.h>
// [[Rcpp::depends(RcppArmadillo)]]
// [[Rcpp::export]]
arma::vec arma_sort(arma::vec x, arma::vec y) {
return x(arma::sort_index(y));
}
/*** R
A <- c(0.5, 0.4, 0.2, 0.9)
B <- c(9, 1, 3, 5)
arma_sort(A, B)
*/
结果:
> arma_sort(A, B)
[,1]
[1,] 0.4
[2,] 0.2
[3,] 0.9
[4,] 0.5
当然,还有其他方法。在普通C ++的上下文中,Stack Overflow上已经多次询问过这个问题的变化。下面我已经为Rcpp修改了答案here:
#include <Rcpp.h>
using namespace Rcpp;
// [[Rcpp::export]]
NumericVector Rcpp_sort(NumericVector x, NumericVector y) {
// Order the elements of x by sorting y
// First create a vector of indices
IntegerVector idx = seq_along(x) - 1;
// Then sort that vector by the values of y
std::sort(idx.begin(), idx.end(), [&](int i, int j){return y[i] < y[j];});
// And return x in that order
return x[idx];
}
/*** R
A <- c(0.5, 0.4, 0.2, 0.9)
B <- c(9, 1, 3, 5)
Rcpp_sort(A, B)
*/
结果:
> Rcpp_sort(A, B)
[1] 0.4 0.2 0.9 0.5