从这里编辑：

Question

是否存在比以下

更有效的查询

DT[, list(length(unique(OrderNo)) ),customerID]

使用客户ID，订单号和产品系列项细化LONG格式表，这意味着如果客户在该交易中购买了多个商品，则会有重复的行具有相同的订单ID。

尝试制作独特的购买方式。 length()按客户ID计算所有订单ID，包括重复项，仅查找唯一编号。

从这里编辑：

这是一些虚拟代码。理想情况下，我正在寻找的是使用unique()的第一个查询的输出。

df <- data.frame(
             customerID=as.factor(c(rep("A",3),rep("B",4))),
             product=as.factor(c(rep("widget",2),rep("otherstuff",5))),
             orderID=as.factor(c("xyz","xyz","abd","qwe","rty","yui","poi")),
             OrderDate=as.Date(c("2013-07-01","2013-07-01","2013-07-03","2013-06-01","2013-06-02","2013-06-03","2013-07-01"))
             )

DT.eg <- as.data.table(df)
#Gives unique order counts
DT.eg[, list(orderlength = length(unique(orderID)) ),customerID]
#Gives counts of all orders by customer
DT.eg[,.SD, keyby=list(orderID, customerID)][, .N, by=customerID]

         ^
         |
  This should be .N, not .SD  ~ R.S.

Answer 1

如果您要计算每位客户的独特购买数量，请使用

 DT[, .N, keyby=list(customerId, OrderNo)][, .N, by=customerId]

Answer 2

从版本1.9.6开始（2015年9月19日CRAN），data.table获得了辅助函数uniqueN()，它相当于length(unique(x))但更快（根据{{3 }}）。

有了这个，

DT.eg[, list(orderlength = length(unique(orderID)) ),customerID]

和

DT.eg[,.N, keyby=list(orderID, customerID)][, .N, by=customerID]

可以改写为

DT.eg[, .(orderlength = uniqueN(orderID)), customerID]

   customerID orderlength
1:          A           2
2:          B           4

有效使用R data.table和unique（）

从这里编辑：

2 个答案: