R中的函数 - 转换1/0变量

Question

我需要设置一个函数来帮助我恢复0/1中的Yes / No变量。

一个功能应该是

x<-function(DataFrame,VariableName,Yes,No){
   .....
  }

我设置了这段代码，但只运行了该函数，因为R不会在美元符号后读取（）中设置的变量。

dummy<-function(DB,varr){
        BD$varr <- as.character(DB$varr)
        DB[BD$varr=="Yes"]<-"1"
        DB[BD$varr=="No"]<-"0"
}

Answer 1

我们可以使用as.integer将logical向量强制转换为二进制

as.integer(BD$varr=="Yes")