联合使用；至于；及；如果；R中的算子

我想从数据帧d3中收集所有非因素，并将它们放入表m

for (i in 1:12) {
  m<-as.data.frame(matrix(100,nrow = nrow(d3),ncol = ncol(d3)))
  if (!is.factor(d3[,i])){
    m[,i]<-d3[,i]
    }
  }

for（1:12中的i）{
每次通过循环，您都在重新创建
m
；它应该在外部

m <- as.data.frame(matrix(100, nrow = nrow(d3), ncol = ncol(d3)))
for (i in 1:12) {
  if (!is.factor(d3[, i])) {
    m[, i] <- d3[, i]
  }
}

m您每次通过循环都在重新创建
m
；它应该在外部

m <- as.data.frame(matrix(100, nrow = nrow(d3), ncol = ncol(d3)))
for (i in 1:12) {
  if (!is.factor(d3[, i])) {
    m[, i] <- d3[, i]
  }
}

m您可以使用dplyr包中的mutate_if函数进行实验。类似于以下内容的操作应该可以使用m%dplyr:：mutate_if（！is.factor）%%>%as.table（）请回答您的问题，并描述“但循环不起作用”的含义。并且提供
d3
数据将是一个很大的帮助。您可以从dplyr软件包中试用mutate_if函数。类似于以下内容应该可以工作m%dplyr:：mutate_if（！is.factor）%%>%as.table（）请回答您的问题，并描述“但循环不起作用”的含义.提供
d3
数据将是一个很大的帮助。