Vermeidung NAs in as.numeric()

Question

Wenn ich das tue, erhalte ich korrektes Ergebnis:

a <- c("10","28","3") 
which(as.numeric(a) == min(as.numeric(a))) 
[1] 3 

Aber wenn es NAs in dem Vektor, dann gibt es ein Problem

a <- c("10","28","3","NA") 
which(as.numeric(a) == min(as.numeric(a))) 
integer(0) 
Warning messages: 
1: In which(as.numeric(a) == min(as.numeric(a))) : 
    NAs introduced by coercion 
2: In which(as.numeric(a) == min(as.numeric(a))) : 
    NAs introduced by coercion 

Answer 1

Zwei Dinge.

Zunächst gibt es einen Unterschied zwischen der Zeichenkette "NA" und der R-Datendarstellung für fehlende Werte, NA. Entfernen Sie die Anführungszeichen um NA in Ihrem Beispiel zu sehen:

a <- c("10","28","3",NA) 

Zweitens, wenn Sie min mit tatsächlichen fehlenden Werten sind (also nicht die Zeichenketten "NA") Sie na.rm = TRUE verwenden möchten:

which(as.numeric(a) == min(as.numeric(a),na.rm = TRUE)) 

Answer 2

Ihr Hauptproblem ist die Angabe nicht na.rm = TRUE im Aufruf min

numeric_a <- as.numeric(a) 

which(numeric_a == min(numeric_a, na.rm = TRUE)) 
## [1] 3 

Oder Sie können die which.min verwenden, die nicht erfordert, dass Sie angeben, dass die NA-Werte entfernt werden sollten. Dies wird Ihnen nur das erste Spiel, nicht alle Spiele (Danke @Dason mich daran erinnert, dies zu klären)

which.min(numeric_a)