给定随机生成的数字的行列提取

Question

由于某些原因，我不清楚为什么我的行列提取代码不能工作。这个示例代码应该可以工作。

set.seed(42)
FX <- data.frame(Location=c(5, 7:10), mi=c(1, 34.6, 6, 44, 5.55))
RX <- data.frame(Course=runif(n=1, min=4, max=5), Cor=runif(n=1, min=2, max=3))
FX
#   Location    mi
# 1        5  1.00
# 2        7 34.60
# 3        8  6.00
# 4        9 44.00
# 5       10  5.55
RX
#     Course      Cor
# 1 4.914806 2.937075

当前代码不起作用：

which(FX==RX[1,1], arr.ind=TRUE)

所需输出：

Row和all cols

Answer 1

‘'RX’只有一行，我们可能需要复制它才能使维度相同

FX == RX[col(FX)]

此外，这些都是浮点值，因此会涉及一些精度，即，除非我们做一些round运算，否则它可能不会完全相等