強制でNAsを導入するときの警告を避ける方法

Question

警告を受け取らないようにRをコード化するのが一般的ですが、as.numericを使用して文字ベクタを変換するときに警告を受け取らないようにする方法はわかりません。例えば

：それは強制でNASに導入されたので

x <- as.numeric(c("1", "2", "X")) 

が私に警告を与えます。私はNAsが強要で導入されることを望んでいます - それは "これは私がやりたいことです"と言う方法があります。あるいは、私はただの警告で暮らすべきですか？

このタスクに別の機能を使用する必要がありますか？

Answer 1

使用suppressWarnings()：

suppressWarnings(as.numeric(c("1", "2", "X"))) 
[1] 1 2 NA 

これは警告を抑制します。

Answer 2

suppressWarnings()は既に述べられている。別の方法として、問題のある文字を最初にNAに手動で変換する方法があります。あなたの特定の問題については、taRifx::destringはそれだけです。このようにして、他の予期しない警告が機能から取り除かれても、それは抑止されません。

> library(taRifx) 
> x <- as.numeric(c("1", "2", "X")) 
Warning message: 
NAs introduced by coercion 
> y <- destring(c("1", "2", "X")) 
> y 
[1] 1 2 NA 
> x 
[1] 1 2 NA 

Answer 3

通常、予期しない入力が行われたときに警告を表示したい場合があるので、警告を抑制することは最適な解決策ではありません。
以下の解決策は、データ型変換中にNAを維持するためのラッパーです。パッケージは一切必要ありません。

as.num = function(x, na.strings = "NA") { 
    stopifnot(is.character(x)) 
    na = x %in% na.strings 
    x[na] = 0 
    x = as.numeric(x) 
    x[na] = NA_real_ 
    x 
} 
as.num(c("1", "2", "X"), na.strings="X") 
#[1] 1 2 NA