r - 在 R 中计算响应率

Question

我在R中有一个数据表，例如:

id 列是唯一的 customerid。我想做的是通过分割因素计算响应率列。

我如何执行诸如 count(unique paymentid)/count(unique id) 之类的函数来排除 paymentid 中的 NA？

我希望我的结果表看起来像:

非常感谢!

Answer 1

可能有一种更优雅的方法来做到这一点，但这里有一个选项(稍微过时的版本)data.table:

library(data.table)
library(scales)
##
setDT(Df)
##
Df2 <- Df[
  ,list(
    NumberSent=.N,
   NumberResponded=length(
     unique(na.omit(paymentid)))),
  by=segment][,ResponseRate:=percent(
    NumberResponded/NumberSent)]
##
R> Df2
   segment NumberSent NumberResponded ResponseRate
1:       Y          2               1        50.0%
2:       R          2               2       100.0%
3:       B          3               2        66.7%

其中 scales 包仅用于函数 percent。

---

数据:

Df <- data.frame(
  id=1:7,
  segment=rep(c("Y","R","B"),c(2,2,3)),
  paymentamount=c(10,NA,20,15,12,13,NA),
  paymentid=c(11,NA,12,13,14,15,NA))