Как на R в data.frame добавить строку, в которой будет содержаться информация о кол-ве определенный значений в соответствующем столбце?

Question

[paroletatel]

У меня есть фрейм данных, в котором некоторые столбцы полностью или частично состоят из [Not Available]. Мне необходимо удалить столбцы, в которых их доля более 90%. Как я понимаю, это нужно делать через цикл. Но как я могу добавить соответствующую строку, и добавить в нее значение кол-во [Not Available] в столбцах? И после удалить определенные столбцы.

Answer 1

[paroletatel]

names <- names(data_pheno_DF)

df <- data.frame(first = c(1))

for(i in 1:(length(names)-1)){
  c <- c(1)
  df <- cbind(df, c)
}
names(df) <- names

data_pheno_DF <- rbind(df, data_pheno_DF)

#data_ph <- data_pheno_DF
data_pheno_DF <- data_ph

for(i in 1:(length(names))){
v <- data_pheno_DF[[i]]
data_pheno_DF[[i]][1] <- (length(v[v == "[Not Available]"]) + length(v[v == "[Not Applicable]"]))/length(v)
}

for(i in length(names):1){
  if(data_pheno_DF[[i]][1] > 0.85){data_pheno_DF[i] <- NULL}
}

data_pheno_DF <- data_pheno_DF[-c(1), ]