对于跨越 R 中两个变量的循环

Question

我正在尝试执行一系列函数，但要在两个变量之间进行选择。我需要先估算缺失值，然后对变量进行归一化。为了估算我使用以下代码。

for(i in (train$B365A:train$BSA)){
  data[i][is.na(data[i])] <- round(mean(data[i], na.rm = TRUE))
 }

所以对于上面的内容，我试图估算缺失值，它们之间大约有 20 个变量。

我想到了这个，但它不影响细胞。

convert_num <- function(i) {
 i <- as.numeric(i)
}
for (i in c(1:3)){
 convert_num(i)
}

数据类似于以下内容希望煤风筝 3 4 5 2 1 5 现在它 class 但需要 numeric.It 有超过 20 个变量和 18k 行。

Answer 1

如果我理解正确，您的问题的解决方案如下。

data <- data.frame(c1 = c(rbinom(10,5,0.5)),
                   c2 = c(rbinom(10,5,0.5)), 
                   c3 = c(rbinom(10,5,0.5)))
data[2:4,1] <- rep(NA,3);data[c(6,8),2] <- rep(NA,2);data[10,3] <- NA
data

# imput data from c1:c3
for(i in 1:3){
  data[i][is.na(data[i])] <- round(mean(data[,i], na.rm = T))
}
data
data[] <- lapply(data,as.numeric) # transform to numeric
sapply(data,class)

对于跨越 R 中两个变量的循环

For loop that span between two variables in R

for-loop

r

data-science