RはNaNをNAに変換できません

Question

私はNAに変換したいと考えているNaNを含むいくつかの係数列を持つデータフレームを持っています（NaNは線形回帰オブジェクトを使用して予測する際に問題があるようです新しいデータ）。

> tester1 <- c("2", "2", "3", "4", "2", "3", NaN) 
> tester1 
[1] "2" "2" "3" "4" "2" "3" "NaN" 
> tester1[is.nan(tester1)] = NA 
> tester1 
[1] "2" "2" "3" "4" "2" "3" "NaN" 
> tester1[is.nan(tester1)] = "NA" 
> tester1 
[1] "2" "2" "3" "4" "2" "3" "NaN" 

Answer 1

を問題です：あなたは、その後nan -nessのためにそれをテストする場合、文字列はFALSEを返し、もちろんそれは「数ではありません」ですので、あなたのベクトルは、モードの文字です。最後の要素は文字列 "NaN"として解釈されました。 is.nanを使用すると、ベクトルが数値である場合にのみ意味があります。文字ベクトルに値がないようにするには（回帰関数によって適切に処理されるように）、（引用符を付けずに）NA_character_を使用します。

> tester1 <- c("2", "2", "3", "4", "2", "3", NA_character_) 
> tester1 
[1] "2" "2" "3" "4" "2" "3" NA 
> is.na(tester1) 
[1] FALSE FALSE FALSE FALSE FALSE FALSE TRUE 

「NA」も「NaN」も文字ベクタには実際にはありません。最後の結果は意外かもしれません

tester1[tester1 == "NaN"] = "NA" 
# but that would not really be a missing value either 
# and it might screw up a factor variable anyway. 

tester1[tester1=="NaN"] <- "NA" 
Warning message: 
In `[<-.factor`(`*tmp*`, tester1 == "NaN", value = "NA") : 
invalid factor level, NAs generated 
########## 
tester1 <- factor(c("2", "2", "3", "4", "2", "3", NaN)) 

> tester1[tester1 =="NaN"] <- NA_character_ 
> tester1 
[1] 2 2 3 4 2 3 <NA> 
Levels: 2 3 4 NaN 

：何らかの理由で、「NaNの」その後、あなただけの論理インデックスを使用できたであろうし、因子変数の値があった場合。残りの「NaN」レベルがありますが、要素のいずれも「NaN」ではありません。代わりに、 "NaN"だった要素がprintで示された本当の欠損値になりました。

Answer 2

EDIT：

ギャビン・シンプソンコメント欄にあなたの状況では、実際には「NA」と「NaNの」あるものに変換する方がはるかに簡単な方法がある、ということを思い出す：

tester1 <- gsub("NaN", "NA", tester1) 
tester1 
# [1] "2" "2" "3" "4" "2" "3" "NA" 

---

ソリューション：

文字ベクトルの要素がNaNあるかを検出するには、数値ベクトルにベクトルを変換する必要があります。

tester1[is.nan(as.numeric(tester1))] <- "NA" 
tester1 
[1] "2" "2" "3" "4" "2" "3" "NA" 

は説明：

これではないことの理由のカップルがあります。あなたが期待するように働いています。

最初に、NaNは "Not a Number"の略語ですが、クラス"numeric"を持ち、数値ベクトルの中でのみ意味を持ちます。

第2に、文字ベクトルに含まれている場合、NaNというシンボルは、暗黙的に文字列"NaN"に変換されます。ここで

class(NaN) 
# [1] "numeric" 
c("1", NaN) 
# [1] "1" "NaN" 
is.nan(c("1", NaN)) 
# [1] FALSE FALSE 

Answer 3

あなたがここに持っているものである文字ベクトル、でNaNを持つことはできません：Rは、これは文字列であると考えてどのように

> tester1 <- c("2", "2", "3", "4", "2", "3", NaN) 
> is.nan(tester1) 
[1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE 
> tester1 
[1] "2" "2" "3" "4" "2" "3" "NaN" 

注意してください。あなたは数値ベクトルでNaNを作成することができます

：

> tester1 <- c("2", "2", "3", "4", "2", "3", NaN) 
> as.numeric(tester1) 
[1] 2 2 3 4 2 3 NaN 
> is.nan(as.numeric(tester1)) 
[1] FALSE FALSE FALSE FALSE FALSE FALSE TRUE 

を次に、もちろん、RはあなたのコードごとにNAにNaNを変換することができます：

> foo <- as.numeric(tester1) 
> foo[is.nan(foo)] <- NA 
> foo 
[1] 2 2 3 4 2 3 NA