Причина NaN в этом коде, кроме данных, R, 3. 5. 1 - PullRequest
Новая
       6

Причина NaN в этом коде, кроме данных, R, 3. 5. 1

0 голосов
/ 05 ноября 2018

Я новичок в R Language, практикую R по некоторым данным

Получил некоторые данные, выполнил несколько кодов, встретил NaN.

Выполнен код: 

pollutantmean <- function (directory = getwd(), pollutant, id = 1:332) {
    initial <- c(0)
    for (x in id) {
            whatToRead <- paste(sprintf('%03d', x), '.csv', sep='')
            data_WTR <- read.csv(paste(directory, '/', whatToRead, sep =''))
            ofPollutant <- data_WTR[pollutant]
            naRemoved <- ofPollutant[!is.na(ofPollutant)]
            initial[x-id[1]+1] <- mean(naRemoved)
            }
    initial
}
pollutantmean(directory = getwd(), "nitrate") # just executed

Я столкнулся с несколькими NaN, как показано здесь 1011 * Есть ли какой-либо источник NaN, кроме данных, которые я не узнаю? Пожалуйста, помогите мне.

...