优化矩阵/数据帧的创建

我正在尝试使用与旧数据框中某列的值匹配的值列表来创建新的矩阵/数据框。另外,对于新的矩阵/数据帧,我希望保留用于匹配的值列表中的顺序。下面是我想要实现的一个例子:

#A list of values used for matching
time.new <- c(2, 3, 4, 3, 4, 5, 4, 5, 6)
#The old data frame which I would match on the column of time.old
old <- data.frame(time.old=1:10, y=rnorm(10))

我通过使用 merge 和 order 但我想避免 合并 和 秩序 因为他们真的放慢了速度,我有一个更大的数据集。矩阵结果是首选的,因为数据帧也可以慢(为进一步的操作),所以任何想法将受到赞赏!

time.new <- data.frame(id = 1:length(time.new), time=time.new)
new_dataframe <- merge(x = time.new, y = old, by.x = "time", by.y="time.old", all.x = TRUE)
new_dataframe <- new_dataframe[order(new_dataframe$id), ]
new_dataframe$id <- NULL