match_order: Match one order to another.

In wrapr: Wrap R Tools for Debugging and Parametric Programming

Match one order to another.

Description

Build a permutation p such that ids1[p] == ids2. See https://win-vector.com/2017/09/02/permutation-theory-in-action/.

Usage

match_order(ids1, ids2)

Arguments

ids1	unique vector of ids.
ids2	unique vector of ids with sort(ids1)==sort(ids2).

Value

p integers such that ids1[p] == ids2

Examples

ids1 <- c(4, 5, 7, 8, 9, 6, 1, 3, 2, 10)
ids2 <- c(3, 6, 4, 8, 5, 7, 1, 9,10, 2)
p <- match_order(ids1, ids2)
ids1[p]
all.equal(ids1[p], ids2)
# note base::match(ids2, ids1) also solves this problem

wrapr documentation built on Aug. 20, 2023, 1:08 a.m.