r - 如何避免类名与包 "loaded via a namespace (and not attached)"(qdap＆openssl)冲突

Question

使用qdap::polarity()函数有时会遇到错误:

Error in derive_pubkey(key) : RAW() can only be applied to a 'raw', not a 'list'

我相当确定这是由于 qdap 的 key 类与 openssl 包的 key 冲突造成的类(因为错误消息中引用了来自 openssl 的 derive_pubkey())。

当 openssl 出现在 sessionInfo() 的 loaded via a namespace (and not Attach): 部分时，就会发生错误似乎放弃了关键类的方法分派(dispatch)并导致错误。

我只能通过重新启动 R session 来修复该错误。有没有办法从 session 中删除 openssl 的足迹来解决此问题？或者有其他方法可以避免此问题而不重新启动 R？

重现错误

> successful      <- qdap::polarity("testing")
> load_openssl_ns <- body(openssl:::print.key)
> fails           <- qdap::polarity("testing")
Error in derive_pubkey(key) : 
  RAW() can only be applied to a 'raw', not a 'list'

Answer 1

对于脏修复运行

`[[.qdap_hash` <- `[[.data.frame`

正在检查...

> qdap::polarity("test")
  all total.sentences total.words ave.polarity sd.polarity stan.mean.polarity
1 all               1           1            0          NA                 NA
> library(openssl)
Warning message:
package ‘openssl’ was built under R version 3.3.3 
> qdap::polarity("test")
Error in derive_pubkey(key) : 
  RAW() can only be applied to a 'raw', not a 'list'
> `[[.qdap_hash` <- `[[.data.frame`
> qdap::polarity("test")
  all total.sentences total.words ave.polarity sd.polarity stan.mean.polarity
1 all               1           1            0          NA                 NA
> 

polarity 中的违规行是 words <- c(posneg, alter[[1]])

对象alter使用 alter_env 创建它创建一个具有类“qdap_hash”，“key”，...的对象

qdap_hash 没有自己的“[[”方法，因此它会检查 key 是否具有“[[”方法，而它通常没有。一旦 openssl 加载，就会有一个 [[ key 方法，因此它使用该方法并给出错误，因为它不是预期的形式。如果我们为 qdap_hash 定义自己的方法，那么在尝试使用 [[.key 之前就会调用该方法。所以我们绕过这个问题。 qdap 的作者已被告知该问题和可能的解决方案。