data.table 函数在脚本中有效，但在包中无效

Question

我有一个函数可以从 data.table 中删除空列，并将其包含在一个包中。

当我加载函数时它以某种方式工作，但当我从包中调用它时却不行。 问题：当我从包中调用它时，为什么这个函数不运行？

包中的任何函数中都没有 require(data.table) 或 library(data.table)。描述文件包含：导入：data.table。 所以Using data.table package inside my own package很满意。

library(data.table)
df = data.table(a = c(1,2,3), b = c(NA, NA, NA), c = c(4,5,6))
library(cr360)

remove.emptycols(df) # from package
Error in .subset(x, j) : invalid subscript type 'list'

# now open function from mypackage and run again:
# source("./mypackage/R/fun_remove_emptycols.R")
remove.emptycols(df)
   a c
1: 1 4
2: 2 5
3: 3 6

功能：

#' Remove empty columns
#' 
#' Counts the number of NA values in the columns and counts the number of rows.
#' @param df
#' @return df data.table with empty columns removed.
#' @export
#' 
#' 
remove.emptycols = function(df) {

count.colNA = df[,lapply(.SD, function(x) sum(is.na(x)))] 
df = df[,which(count.colNA != nrow(df)),with = FALSE]  

return(df)
}

Answer 1

正文

import(data.table)

需要在 NAMESPACE 文件中以及 data.table 需要在DESCRIPTION 字段的Imports: 字段中。我已经编辑了链接的问题并更新了 FAQ 6.9。
Using data.table package inside my own package

另外，在 RStudio 中，请注意“使用 Roxygen 构建 NAMESPACE 文件”选项，请参阅：
Does roxygen2 automatically write NAMESPACE directives for "Imports:" packages?

---

为后代保留以前的红鲱鱼......

不确定，但您的包裹的说明包含：

...
Version: 1.0
Date: 2014-06-23
Imports:
    data.table
Author: Henk
Description: utility functions
...

尝试删除换行符，而不是这样：

...
Version: 1.0
Date: 2014-06-23
Imports: data.table
Author: Henk
Description: utility functions
...