关于错误“：=和`：=`（...）被定义为在j中使用，只有一次和特定的方式。见帮助（“：=”）“

Question

我在data.table中遇到了一个奇怪的错误消息

我使用:=修改了一个data.table，没有任何错误就完全没问题了。当我尝试将代码放入函数时，会出现以下错误消息。

Error in `:=`(date, as.Date(as.character(date), "%Y%m%d") - 1) : 
:= and `:=`(...) are defined for use in j, once only and in particular ways. See     help(":="). Check is.data.table(DT) is TRUE.

这是可重复的例子

testdat <- data.table(ID = c(1:10), date = c(20130101, 20130101, 20130101, 20130101, 20130101, 20130101, 20130101, 20130101, 20130101, 20130101), Number = rnorm(10))
# The single line command works fine. 
testdat[, date := as.Date(as.character(date),"%Y%m%d") - 1][, Number:= NULL]
# But if I wrote them into a function, it failed. 
# ( In this case, it worked as well.. So I got totally lost. ) 
test2 <- data.frame(ID = c(1:10), date = c(20130101, 20130101, 20130101, 20130101, 20130101, 20130101, 20130101, 20130101, 20130101, 20130101), Number = rnorm(10))
readdata <- function(fn){
      DT <- data.table(fn)
      DT[, date:= as.Date(as.character(date),"%Y%m%d") - 1][, Number:= NULL]
      return(DT)
}

为了更好地描述，我将部分原始代码放在这里。所以你可能会明白哪里出了问题。

readdata <- function(fn){
   DT <- fread(fn, sep=",")
   # DT <- fread("1202.txt")
   setnames(DT, paste0("V",c(1:12)), column_names)
   # Modification on date
   setkey(DT,uid)
   DT[,date := as.Date(as.character(date),"%Y%m%d") - 1][, ignore:= NULL] #ignore is the name of one column
...}

我有一个txt文件列表，我想对每个文件进行计算。第一步是使用fread，然后逐个进行。假设我现在要根据“1202.txt”文件进行计算。如果我从DT <- fread("1202.txt")开始然后继续。它不会出现这个错误。

如果我想使用readdata("1202.txt")，则会出现错误消息。最奇怪的是，我之前使用过readdata没有任何错误。

那么这里发生了什么？有什么建议？谢谢。

> sessionInfo()
R version 3.0.2 (2013-09-25)
Platform: x86_64-w64-mingw32/x64 (64-bit)

locale:
[1] LC_COLLATE=English_United States.1252 
[2] LC_CTYPE=English_United States.1252   
[3] LC_MONETARY=English_United States.1252
[4] LC_NUMERIC=C                          
[5] LC_TIME=English_United States.1252    

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] data.table_1.8.11

loaded via a namespace (and not attached):
[1] tools_3.0.2

编辑

经过一些试验，我发现如果我修改代码如下，它就可以了

   readdata <- function(fn){
   DT <- fread(fn, sep=",")
   DT <- data.table(DT) ## Just add this line compared to the original one.
   # DT <- fread("1202.txt")
   setnames(DT, paste0("V",c(1:12)), column_names)
   # Modification on date
   setkey(DT,uid)
   DT[,date := as.Date(as.character(date),"%Y%m%d") - 1][, ignore:= NULL] #ignore is the name of one column
...}

所以错误是由于恐惧？在fread之后，它应该是data.table。为什么我需要使用data.table（DT）来转换它？

编辑

谢谢你的关注。这是2014年2月4日的更新

我首先卸载了我的1.8.11，并按照Matt的说明进行操作。再次从CRAN安装1.8.10，然后一步一步地执行他的代码。事实证明没有任何错误。

然后我卸载了1.8.11，然后尝试使用预编译的zip文件再次安装1.8.11。

像往常一样，有一条警告信息：

> install.packages("~/Desktop/data.table_1.8.11.zip", repos = NULL)
Warning in install.packages :
package ~/Desktop/data.table_1.8.11.zip?is not available (for R version 3.0.2)
Installing package into C:/Users/James/R/win-library/3.0?(as lib?is unspecified)
package data.table?successfully unpacked and MD5 sums checked

> require(data.table)
Loading required package: data.table
data.table 1.8.11  For help type: help("data.table")

似乎警告消息是错误的，当我加载包时它完全没问题。而在这个时候，整个过程完全没问题。感谢Matt，Arun和所有其他热情的人的耐心。我是data.table的初学者。而你的善意真的很感激。

这是另外一件事，正如我已经在这个link报道的那样，仍然没有解决。

> ?melt.data.table
No documentation for 憁elt.data.table?in specified packages and libraries:
you could try ??melt.data.table?

真的很可惜。有任何想法吗？

我在该链接中报告了我的sessionInfo。我使用的是Win8.1 64位

Answer 1

另一答案