在R中添加列以清空data.table

Question

为了向现有的空data.table(版本1.8.6)添加新列,没有被警告似乎没有办法做到这一点.

例:

dt<-old.table[0]
dt[,new_column:=""]

这会产生警告:

In '[.data.table'(dt, , ':='(new_column,"")):    
Supplied 1 items to be assigned to 0 items of column 'new_column' (1 unused)

有没有办法在没有警告的情况下添加新列？

Answer 1

好问题.指定一个空字符向量(character())而不是长度为1的字符向量("").

> DT = data.table(a=1:3,b=4:6)
> DT2 = DT[0]
> DT2
Empty data.table (0 rows) of 2 cols: a,b
> DT2[,newcol:=character()]    # no warning
> DT2
Empty data.table (0 rows) of 3 cols: a,b,newcol
> sapply(DT2,class)
          a           b      newcol 
  "integer"   "integer" "character" 

顺便说一句,""[0]是另一种创建0长度字符向量的方法; character()根据您的偏好,输入的字符数少于7个字符但可能不太可读.

Answer 2

就像添加空字符列一样,当data.table有任意行数(包括0)时:

DT2[ ,newcol:=character(.N) ]