Я пытаюсь подсчитать количество строк в файле .csv, в которых есть NA, но каждый раз, когда я пытаюсь использовать серию файлов, которые не начинаются с 1, я получаю очень странный вывод, показанный ниже,Кроме того, мой код, кажется, дает мне неправильный ответ для файла, по крайней мере, в соответствии с ответом, который дают мне мои преподаватели (мои ответы всегда указывают на гораздо более полные случаи, чем их). Что я делаю не так?
complete <- function(directory, site.id = 1:332) {
DF <- data.frame(id = c())
all_files <- list.files(directory, full.names = TRUE)
for (i in site.id) {
path <- (all_files[i])
dat <- read.csv(path)
DF[i, 1] <- sum(!complete.cases(dat))
}
monitors <- data.frame(site.id)
DF <- cbind(monitors, DF)
names(DF) <- c("ID", "NOBS")
print(DF)
}
для завершения ("specdata", site.id = 6:10) Я ожидаю, что результат будет:
ID NOBS
6 1598
7 2845
8 1269
9 1916
10 948
Но вместо этого я получаю:
ID NOBS
1 6 NA
2 7 NA
3 8 NA
4 9 NA
5 10 NA
6 6 1598
7 7 2845
8 8 1269
9 9 1916
10 10 948
Кроме того, как указано выше, эти цифры кажутся слишком большими.