9

如果中的列名采用data.table的形式number + character，例如：4PCS等5Y，那么如何将其引用为jinx[i,j]以便将其解释为未加引号的列名。

我认为这将解决我原来的问题。我想在“data.table”中添加几列，格式为number + character。

M <- data.table('4PCS'=1:4,'5Y'=4:1,X5Y=2:5)
> M[,4PCS+5Y]
Error: unexpected symbol in "M[,4PCS"

新列应该是 和 的4PSC总和5Y。

有没有办法以data.table不引用的形式引用它们？如果这些列是data.table用引用的“逻辑”引用的data.frame：

> M[,'5Y',with=FALSE]
     5Y
[1,]  4
[2,]  3
[3,]  2
[4,]  1

那么此类参考的功能将受到限制。添加不起作用，因为它不起作用data.frame：

> M[,'4PCS'+'5Y',with=FALSE]  
Error in "4PCS" + "5Y" : non-numeric argument to binary operator

该data.table功能将允许对列进行操作。我想在新data.table逻辑中找到一个解决方案，因此我可以使用它通过列名引用来转换列的能力。

问题是：
如何引用以数字开头的列名，以便 data.table 逻辑理解它是列名。

4

2 回答 2

16

我想，这就是你要找的，不确定。不同于. data.table_ _ 请查看快速介绍，然后查看常见问题解答（如果需要，还可以查看参考手册）。data.frame

require(data.table)
dt <- data.table("4PCS" = 1:3, y=3:1)
#    4PCS y
# 1:    1 3
# 2:    2 2
# 3:    3 1

# access column 4PCS
dt[, "4PCS"]

# returns a data.table
#    4PCS
# 1:    1
# 2:    2
# 3:    3

# to access multiple columns by name
dt[, c("4PCS", "y")]

或者，如果您需要访问该列而不是生成一个data.table，而是一个向量，那么您可以使用以下$符号进行访问：

dt$`4PCS` # notice the ` because the variable begins with a number
# [1] 1 2 3

# alternatively, as mnel mentioned under comments:
dt[, `4PCS`] 
# [1] 1 2 3

或者，如果您知道列号，您可以使用[[.]]如下方式访问：

dt[[1]] # 4PCS is the first column here
# [1] 1 2 3

编辑：

谢谢@joran。我想你正在寻找这个：

dt[, `4PCS` + y]
# [1] 4 4 4

从根本上说，问题在于这4CPS不是 R 中的有效变量名（尝试4CPS <- 1，您将得到相同的“意外符号”错误）。所以要引用它，我们必须使用反引号（比较`4CPS` <- 1）

于 2013-03-26T12:35:00.910 回答
0

您还可以在要调用的变量名称之前放置一个“X”，以使 R 将其识别为名称，而不是将数字和字符串评估为不同的（因此语法错误）

所以例如当调用 4PCS 时使用 X4PCS

如在

我的数据 <- X4PCS

于 2018-10-18T14:14:34.643 回答