使用 data.table 语法在 disk.frame 对象中进行非标准评估时出现问题

Jos*_*rop 5 r data.table non-standard-evaluation disk.frame

问题

我目前正在尝试编写一个函数,disk.frame使用正则表达式过滤对象的某些行。不幸的是,我在过滤器函数中评估搜索字符串时遇到了一些问题。我的想法是将正则表达式作为字符串传递到函数参数(例如storm_name)中,然后将该参数传递到我的过滤调用中。我使用%like%包含的函数{data.table}来过滤行。

我的问题是该storm_name对象在 disk.frame 内进行评估。但是,由于storm_name只包含在函数环境中,而不包含在 disk.frame 对象中,因此出现以下错误:

Error in .checkTypos(e, names_x) : 
  Object 'storm_name' not found amongst name, year, month, day, hour and 8 more
Run Code Online (Sandbox Code Playgroud)

我已经尝试storm_name使用 评估父框架中的对象eval(sotm_name, env = parent.env()),但这也没有帮助。有趣的是,这个问题只发生在{disk.frame}对象上,而不会发生在{data.table}对象上。

现在我找到了一个解决方案,使用{dplyr}它来代替。但是,如果您能提供有关如何解决此问题的任何想法,我将不胜感激{data.table}

可重复的例子

# Load packages
library(data.table)
library(disk.frame)

# Create data table and diskframe object of storm data
storms_df <- as.disk.frame(storms)
storms_dt <- as.data.table(storms)

# Create search function
grep_storm_name <- function(dfr, storm_name){
  
  dfr[name %like% storm_name]
  
}

# Check function with data.table object
grep_storm_name(storms_dt, "^A")

# Check function with diskframe object
grep_storm_name(storms_df, "^A")
Run Code Online (Sandbox Code Playgroud)

会议信息

R version 4.1.0 (2021-05-18)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows 10 x64 (build 19043)

Matrix products: default

locale:
[1] LC_COLLATE=English_Sweden.1252  LC_CTYPE=English_Sweden.1252    LC_MONETARY=English_Sweden.1252
[4] LC_NUMERIC=C                    LC_TIME=English_Sweden.1252    

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] disk.frame_0.5.0  purrr_0.3.4       dplyr_1.0.7       data.table_1.14.0

loaded via a namespace (and not attached):
 [1] Rcpp_1.0.7            benchmarkmeData_1.0.4 pryr_0.1.4            pillar_1.6.4         
 [5] compiler_4.1.0        iterators_1.0.13      tools_4.1.0           digest_0.6.27        
 [9] bit_4.0.4             jsonlite_1.7.2        lifecycle_1.0.1       tibble_3.1.6         
[13] lattice_0.20-44       pkgconfig_2.0.3       rlang_0.4.12          Matrix_1.3-3         
[17] foreach_1.5.1         rstudioapi_0.13       DBI_1.1.1             parallel_4.1.0       
[21] bigassertr_0.1.4      bigreadr_0.2.4        httr_1.4.2            stringr_1.4.0        
[25] globals_0.14.0        generics_0.1.1        fs_1.5.0              vctrs_0.3.8          
[29] bit64_4.0.5           grid_4.1.0            tidyselect_1.1.1      glue_1.6.0           
[33] listenv_0.8.0         R6_2.5.1              future.apply_1.7.0    parallelly_1.25.0    
[37] fansi_1.0.0           magrittr_2.0.1        codetools_0.2-18      ellipsis_0.3.2       
[41] fst_0.9.4             assertthat_0.2.1      future_1.21.0         benchmarkme_1.0.7    
[45] utf8_1.2.2            stringi_1.7.6         doParallel_1.0.16     crayon_1.4.2 
Run Code Online (Sandbox Code Playgroud)

xia*_*dai 2

现在它可以从 disk.frame v0.6 开始工作