Вы используете var
в качестве символьной строки, когда dplyr::count
нужна переменная.чтобы получить переменную, используйте get
.
. В этом примере фрейм данных freq
будет встроенным набором данных int iris
.
freq <- iris
n <- names(freq)
n <- n[sapply(n, function(var) is.factor(freq[[var]]))]
for(var in n){
cnt <- dplyr::count(freq, get(var))
print(cnt)
}
## A tibble: 3 x 2
# `get(var)` n
# <fct> <int>
#1 setosa 50
#2 versicolor 50
#3 virginica 50