用于创建具有剪切功能的新变量的循环

问题描述

我有一个包含 7 个变量的数据集。我想将变量 2-7 重新编码为分类带并创建一个新变量,就像我为以下变量之一所做的那样:

state$sal_cut <-cut(state$sal,c(0,.25,.5,.75,1),labels = c(1:4))

我想为此使用循环,但我真的不知道从哪里开始。

我试过了:

for (i in 2:7 (colnames(state))) {
  if(grepl("state_",colnames(state)[i])) {}
  state[paste(i,"cut",sep="_")] <- cut(state[i],labels = c(1:4))

&得到这个错误

Error in 7(colnames(district)) : attempt to apply non-function

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)