如何比较 r 中两个数据框的值并在 R 中创建一个新的数据框作为结果

Question

我有两个数据框：

我的.data.1

       AIRLINE    STORES
[1]    500        100
[2]    300        200

我的.data.2

       AIRLINE   STORES
33%    50        25
67%    150       65

我想通过从 my.data.1 的列中获取每个值来比较它们来创建一个新的数据框，并检查它是否大于或小于或介于 my.data 中相应列的值之间。 2

例如：

  my.data.1[1, 'AIRLINE'] < my.data.2['33%', 'AIRLINE'] = 'LOW'

  my.data.1[1, 'AIRLINE'] > my.data.2['67%', 'AIRLINE'] = 'HIGH'

  my.data.1[1, 'AIRLINE'] >= my.data.2['33%', 'AIRLINE'] && 
      my.data.1[1, 'AIRLINE'] <= my.data.2['67%', 'AIRLINE'] = 'MED'

这样我就会得到一个看起来像这样的数据名

       AIRLINE    STORES
[1]    HIGH        HIGH
[2]    HIGH        HIGH

Answer 1

你的问题不是很清楚。试试下面的方法是否适合你：

df1 <- data.frame(AIRLINE = c(500, 300),
                  STORES = c(100, 200))
df2 <- data.frame(AIRLINE = c(50, 150),
                  STORES = c(25, 65))
getScore <- function(x, y) {
  ifelse(x < y[1], "LOW",
         ifelse(x > y[2], "HIGH", "MED"))
}
df3 <- df1
df3$AIRLINE <- sapply(df1$AIRLINE, getScore, df2$AIRLINE)
df3$STORES <- sapply(df1$STORES, getScore, df2$STORES)         
df3
  AIRLINE STORES
1    HIGH   HIGH
2    HIGH   HIGH