通过正则表达式过滤的选择性suppressWarnings()

发布时间：2020-12-14 06:00:15 所属栏目：百科来源：网络整理

导读：为了生成在没有警告的情况下运行的代码,因此可以使用选项运行(warn = 2),我正在寻找一个suppressWarnings例程的实现,它只会过滤与给定(矢量)正则表达式匹配的警告.有些警告就像我所知,就像着名的警告一样 Unrecognized record type 7,subtype 18 encountered

为了生成在没有警告的情况下运行的代码,因此可以使用选项运行(warn = 2),我正在寻找一个suppressWarnings例程的实现,它只会过滤与给定(矢量)正则表达式匹配的警告.有些警告就像我所知,就像着名的警告一样

Unrecognized record type 7,subtype 18 encountered in system file

在阅读某些SPSS文件时,我想有选择地抑制它们,而不会影响其他可能的警告.

是否已经实现了此功能？

解决方法

使用withCallingHandlers和invokeRestart抑制警告,使用上面提到的“muffleWarning”重启？警告

withCallingHandlers({
    x <- 0
    warning("Unrecognized record 123")
    x <- x + 1
    warning("another warning")
    x + 1
},warning = function(w) {
    if (startsWith(conditionMessage(w),"Unrecognized record"))
        invokeRestart("muffleWarning")
})

这有输出

[1] 2
Warning message:
In withCallingHandlers({ : another warning

(如果您希望停止警告,请使用tryCatch).正如@BenBolker提到的那样,它不处理翻译;制作更精细的正则表达式并不会令人满意.为了捕捉自己的警告,人们可以make and throw a subclass of warning.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!