前回はカテゴリ値だったので、数値もやっておきます。
library("dplyr")
which(
sapply(
colnames(iris),
function(c) {
iris[[c]] %>%
na.omit() %>%
is.numeric()
}
)
) %>%
names()
'Sepal.Length''Sepal.Width''Petal.Length''Petal.Width'
前回はカテゴリ値だったので、数値もやっておきます。
library("dplyr")
which(
sapply(
colnames(iris),
function(c) {
iris[[c]] %>%
na.omit() %>%
is.numeric()
}
)
) %>%
names()
'Sepal.Length''Sepal.Width''Petal.Length''Petal.Width'
コメント