基于R中的行名称向列中添加文本

我是R的新用户。我编写了一个

if

函数，它为我提供了长度超出设定长度范围的数据行。输出如下所示：

1690 Field mouse 100

（行名称、种类、长度）

---

我有一个质量栏（

df$quality

），我想为范围之外的所有人添加注释。是否可以编写一些基于行名称的代码，即在

df$Quality

列中的这一行添加此文本

“Query:size over range”

，此示例可能有助于：

> df <- data.frame(Rowname=1:6, Species=letters[1:6],length=rep(c(99,101),times=3))
> df
  Rowname Species length
1       1       a     99
2       2       b    101
3       3       c     99
4       4       d    101
5       5       e     99
6       6       f    101
> df[df$length > 100,"Quality"] <- "Query: size above range"
> df
  Rowname Species length                 Quality
1       1       a     99                    <NA>
2       2       b    101 Query: size above range
3       3       c     99                    <NA>
4       4       d    101 Query: size above range
5       5       e     99                    <NA>
6       6       f    101 Query: size above range

>测向
行名物种长度
1 a 99
2乙101
3 c 99
4 d 101
5 e 99
6楼101
>df[df$长度>100，“质量”]df
行名种长度质量
1 a 99
2 b 101查询：大小超出范围
3 c 99
4 d 101查询：大于范围的大小
5 e 99
6 f 101查询：尺寸大于范围

---

作为替代起点，您还可以使用row.names（df）进行类似的处理。

另一种解决方案，尤其是如果您有一个大数据集，就是使用

dplyr

打包：

library(dplyr)
mtcars %>%
  mutate(Quality=ifelse(mpg>20, "Query: size above range", "Query: size below range"))

    mpg cyl  disp  hp drat    wt  qsec vs am gear carb                 Quality
1  21.0   6 160.0 110 3.90 2.620 16.46  0  1    4    4 Query: size above range
2  21.0   6 160.0 110 3.90 2.875 17.02  0  1    4    4 Query: size above range
3  22.8   4 108.0  93 3.85 2.320 18.61  1  1    4    1 Query: size above range
4  21.4   6 258.0 110 3.08 3.215 19.44  1  0    3    1 Query: size above range
5  18.7   8 360.0 175 3.15 3.440 17.02  0  0    3    2 Query: size below range
...