R：如何将选择表达式列表（本例中为字符串）传递给子集函数？

Here is some example data:

以下是一些示例数据：

data = data.frame(series = c("1a", "1b", "1e"), reading = c(0.1, 0.4, 0.6))

> data
  series reading
1     1a     0.1
2     1b     0.4
3     1e     0.6
data