Повторите расчет для переменных с тем же root

Question

Это игрушечный фреймворк:

mydata<-structure(list(katz1 = c(1, 1, 1, 0, 1, 1, 1, 1, 1, 0), katz2 = c(1,
1, 1, 1, 1, 1, 1, 1, 1, 1), katz3 = c(1, 1, 1, 1, 1, 1, 1, 1, 1, 1)), row.names = c(NA, 10L),
class = c("tbl_df", "tbl", "data.frame" ))

Я хочу получить таблицу для каждой переменной katz с al oop. Это не сработало:

for (i in 1:3) 
{
  item<-paste0("mydata","$","katz",i)
  table(item,useNA="ifany")
}

Он создает элемент, но таблица к нему не применяется.

Что не так?

Спасибо.

Answer 1

Вместо этого используйте только имя столбца для подмножества в скобках.

for (i in 1:3) {
  item <- paste0("katz", i)
  print(table(mydata[, item], useNA="ifany"))
}

Или, чтобы избежать циклов for, используйте grepl в lapply. Это идентифицирует столбцы, содержащие "katz" в своих именах, и применяет к ним table.

lapply(mydata[grepl("katz", names(mydata))], table, useNA="ifany")