0
我想要計算SPSS文件中所有變量的每個missing.value的缺失值數量。我使用memisc包導入文件。這裏是我的實際代碼:計算SPSS文件中缺失值的數量(使用memisc)
library(memisc)
#Takes about 70seconds
escc <- spss.system.file(file.choose(), to.lower=FALSE)
system.time({
esccMiss <- matrix(,length(escc),9)
esccMiss[,1] <- names(escc)
for (i in 1:length(escc)) {
x <- escc[i]
if(length(miss <- missing.values(x)) > 0) {
ifelse(length([email protected])>0 , vals <- [email protected][1]:([email protected][1]+3), vals <- [email protected])
for (j in 1:length(vals)) {
esccMiss[i, 2*j] <- vals[j]
esccMiss[i,2*j+1] <- length(x[x == vals[j]])
}
}
}
})
我是相當新的R(說明我的代碼的C結構),我知道這是很慢,但我有困難就找到了辦法做lapply功能samething在memisc軟件包中。