Мы можем subset
кадр данных на основе значений, а затем match
и order
.
df1 <- subset(df, V1 %in% c(4,7, 5,1,9))
df2 <- subset(df, V1 %in% c(6,10, 2,3,8))
df1 <- df1[order(match(df1$V1, c(4,7, 5,1,9))), ]
df1
# V1 V2
#4 4 D
#7 7 G
#5 5 E
#1 1 A
#9 9 I
df2 <- df2[order(match(df2$V1, c(6,10, 2,3,8))), ]
df2
# V1 V2
#6 6 F
#10 10 J
#2 2 B
#3 3 C
#8 8 H