相关疑难解决方法(0)

我正在整理一个我已经工作了近一年的包裹.我有一个我称之为音节查找功能所需的哈希表.哈希表实际上只是一个查找表的环境(我想我不是计算机专家).您可以在下面看到我创建它的功能.我有一个数据集DICTIONARY(约20,000字),将在加载包时加载.我还要将这个DICTIONARY传递给hash函数以在加载包时创建一个新环境; 像env <- hash(DICTIONARY)htis 这样的东西就是我现在如何加载环境.如何在加载包时启动函数运行,以便为使用我的包的人创建这个新环境？

hash <- function(x, type = "character") {
    e <- new.env(hash = TRUE, size = nrow(x), parent = emptyenv())
    char <- function(col) assign(col[1], as.character(col[2]), envir = e)
    num <- function(col) assign(col[1], as.numeric(col[2]), envir = e)
    FUN <- if(type=="character") char else num
    apply(x, 1, FUN)
    return(e)
}

#currently how I load the environment with the DICTIONARY lookup table
env <- hash(DICTIONARY) 

DICTIONARY如果它有用,这是它的负责人:

    word syllables
1     hm         1
2    hmm         1 …