lapply ign NA NA

Question

こんにちは私は私のデータセットのトレーニングデータ[1]の列を正規化したいと思います。この列の型はnumです。しかし、以下のコードを実行すると、それは私のすべてのNAを与えました、それは私のデータセットにNAがあるからです、そして、それを無視するためにlapplyにどのように伝えることができますか？

normalize <- function(x) { 
    return ((x - min(x))/(max(x) - min(x))) 
} 

trainingData[1] <- as.data.frame(lapply(trainingData[1], normalize)) 

ありがとうございます！

Answer 1

することはあなたがあなたのnormalize()機能へのへis.na()フィルタに構築することができ、この

normalize <- function(x) { 
        return ((x - min(x,na.rm=T))/(max(x,na.rm=T) - min(x,na.rm=T))) 
       } 

Answer 2

をお試しください：

normalize <- function(x) { 
    #first option 
    x <- x[!is.na(x)] 
    #second option 
    #x <- na.omit(x) 
    return ((x - min(x))/(max(x) - min(x))) 
}