使用 R,可变检查是否`exists`

问题描述

我想将 R::base 函数 exists 包装到一个包装函数中,使其本质上更基于 C 和可变参数。

### current examples of `exists` usage

if(!exists(".humanVerse")) { initMemory(); }

#############################

if(!exists("path",.GlobalEnv$.humanVerse) || purge.memory)
        {  
        ### do something here
        }

#############################

if(exists(save.key,.GlobalEnv$.humanVerse[["colors"]][["dataframes"]]))
            {
            return( .GlobalEnv$.humanVerse[["colors"]][["dataframes"]][[save.key]] );
            }

以上示例按应用顺序运行良好。但是如果我想写一个函数来捕获或捕获不存在的密钥,就会出现问题。

exists("not.created");

checkExists = function(x)
    {
    exists(x);  
    }

checkExists(not.created);

抛出一个找不到对象的错误。当然,我认识到“not.created”的“字符串”形式与可变参数形式不同。

我正在寻找使 checkExists 函数工作的方法

x 中的 exists 查找名称,字符向量。如果我想 checkExists一个对象上而不是一个字符上怎么办?这就是可变参数问题的本质。

也许我只是在问如何捕获对象的角色名称?我不知道。 R::base 逻辑不时扭曲我的逻辑。

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)