[软件熟悉度]:
新手(没写过程式，R 是我的第一次)
请教各位，
当我用complete.cases选出data中没有na值的资料设成data1
想用data1计算出同样id的行有几个，
但是最后的result其index值和row name不一样，
想请教要如何才能把index改成和row name 一样？
complete <- function(x, z) {
filelist <- list.files("./specdata/", full.names = T)
data <- data.frame()
##读入全部data
for(i in z){
data <- rbind(data, read.table(filelist[i], header = T, sep =","))
}
##只要没有na值的
data1 <- data[complete.cases(data), ]
data1$ID.F <- as.factor(data1$ID)
##看同一个id的资料有几个
result <- tapply(data1$ID, data1$ID, length)
result2 <- as.data.frame(result)
result2
}
data里包含ID, data, sulfate
所以同一个id里会有很多笔不同data和sulfate的资料