eval函数中的R错误

eval函数中的R错误,r,function,eval,R,Function,Eval,大家好,我正在尝试在R中创建一个函数来清理数据。。。下面的代码是它的一部分 limpio=function (tabla, campo, campo_conteo){ tabla1<-aggregate(campo_conteo ~ campo, tabla, length) colnames(tabla1)[2]<-"frecuencia" tabla2 <- gsub('\\s+','',toupper(tabla1$campo)) View(tabla

大家好,我正在尝试在R中创建一个函数来清理数据。。。下面的代码是它的一部分

limpio=function (tabla, campo, campo_conteo){

  tabla1<-aggregate(campo_conteo ~ campo, tabla, length)
  colnames(tabla1)[2]<-"frecuencia"
  tabla2 <- gsub('\\s+','',toupper(tabla1$campo)) 
  View(tabla2) }
我得到以下错误:

eval(expr、envir、enclose)中出错:找不到对象“CustomerID”

但是该列确实存在,所以不知道问题出在哪里

colnames(vendidos)

 #[1] "ID"             "CampaignID"     "CustomerID"     "PhoneID"        "Name"          
 #[6] "NumberType"     "Number"         "Birthday"       "Sex"            "Holder"        
#[11] "HolderNumber"   "Nacionality"    "Address"        "City"           "Zip"  

不能像这样创建公式对象。您需要向函数传递字符,并根据以下内容创建公式:

limpio <- function (tabla, campo, campo_conteo){
  f <- as.formula(paste(campo_conteo, campo, sep="~"))
  tabla1<-aggregate(f, tabla, length)
  colnames(tabla1)[2]<-"frecuencia"
  gsub('\\s+','',toupper(tabla1$campo)) 
  }

limpio(vendidos, "Nacionality", "CustomerID")

limpio不能创建这样的公式对象。您需要向函数传递字符,并根据以下内容创建公式:

limpio <- function (tabla, campo, campo_conteo){
  f <- as.formula(paste(campo_conteo, campo, sep="~"))
  tabla1<-aggregate(f, tabla, length)
  colnames(tabla1)[2]<-"frecuencia"
  gsub('\\s+','',toupper(tabla1$campo)) 
  }

limpio(vendidos, "Nacionality", "CustomerID")

limpio不能创建这样的公式对象。您需要向函数传递字符,并根据以下内容创建公式:

limpio <- function (tabla, campo, campo_conteo){
  f <- as.formula(paste(campo_conteo, campo, sep="~"))
  tabla1<-aggregate(f, tabla, length)
  colnames(tabla1)[2]<-"frecuencia"
  gsub('\\s+','',toupper(tabla1$campo)) 
  }

limpio(vendidos, "Nacionality", "CustomerID")

limpio不能创建这样的公式对象。您需要向函数传递字符,并根据以下内容创建公式:

limpio <- function (tabla, campo, campo_conteo){
  f <- as.formula(paste(campo_conteo, campo, sep="~"))
  tabla1<-aggregate(f, tabla, length)
  colnames(tabla1)[2]<-"frecuencia"
  gsub('\\s+','',toupper(tabla1$campo)) 
  }

limpio(vendidos, "Nacionality", "CustomerID")


limpio我会试试limpo(vendidos,nationality,vendidos[,2])。从您提供的信息来看,您的表vendidos中似乎没有任何国民性。我有,我只显示了部分列。您对上述建议的方法有任何错误吗?我会尝试limpo(vendidos,国民性,vendidos[,2])。从您提供的信息来看,您的表vendidos中似乎没有任何国民性。我有,我只显示了部分列。您对上述建议的方法有任何错误吗?我会尝试limpo(vendidos,国民性,vendidos[,2])。从您提供的信息来看,您的表vendidos中似乎没有任何国民性。我有,我只显示了部分列。您对上述建议的方法有任何错误吗?我会尝试limpo(vendidos,国民性,vendidos[,2])。从您提供的信息来看,您的表vendidos中似乎没有任何民族性。我有,我只显示了部分列。您对上述建议的方法有任何错误吗?通过您的代码,我得到以下错误:错误:在“gsub('\\s+','',toupper(tabla1$campo))}”中出现意外的'}'我添加了缺少的括号。如果不提供可复制的测试示例,就会发生这种情况。您可以自己修复打字错误。抱歉,我没有看到。使用您的代码,我会出现以下错误:错误:在“gsub('\\s+','',toupper(tabla1$campo))}”中出现意外“}”,我添加了缺少的括号。如果不提供可复制的测试示例,就会发生这种情况。您可以自己修复打字错误。抱歉,我没有看到。使用您的代码,我会出现以下错误:错误:在“gsub('\\s+','',toupper(tabla1$campo))}”中出现意外“}”,我添加了缺少的括号。如果不提供可复制的测试示例,就会发生这种情况。您可以自己修复打字错误。抱歉,我没有看到。使用您的代码,我会出现以下错误:错误:在“gsub('\\s+','',toupper(tabla1$campo))}”中出现意外“}”,我添加了缺少的括号。如果不提供可复制的测试示例,就会发生这种情况。你可以自己修改打字错误。对不起,我没看到。