r - 总结期间出错：“closure”类型的“envir”参数无效

Question

嗨，我正在尝试将 week# 分配给纵向数据集中的参与者的功能。这是当前的

week_counter <- function(df, colnamer) {
  df$Weeknum <- with(df, paste0('Week', ave(colnamer, colnamer, FUN = seq_along)))
  setDT(df)[, Weeknum := paste0('Week', seq_len(.N)), colnamer]
  view(df)
}

这以前可以工作，但是当它是包的一部分时，我收到错误“包装期间错误：'closure'类型的'envir'参数无效错误：没有更多可用的错误处理程序（递归错误？）；调用'abort'重启”。知道如何解决这个问题吗？