具有可变数量参数的简单R函数

Question

我正在处理将一堆stata代码转换为R以执行数据清理的项目，而我正在尝试执行的一件事是编写一个R函数来清理所有我以前编码为（是= 1，否= 2）的标准虚拟变量的是/否变量。

问题在于需要使用此函数清理的变量数量将不断变化。所以我的猜测是函数需要将（1）数据集/数据帧与所有变量作为参数，（2）需要清理的变量列表。

任何帮助将不胜感激，因为我是很新，R.

谢谢！

Answer 1

你可以试试这个：

example <- data.frame(sex=runif(10),q1=rep.int(c(1,2),5),q2=rep.int(c(2,1),5)) 

yesno <- function(data, variables) { 
    data.new <- data 
    data.new[,names(data) %in% variables] <- -data[,names(data) %in% variables]+2 
    return(data.new) 
} 

example 
yesno(example, c("q1","q2")) 

Answer 2

sapply(data, function(x) {-x+2})

data包含您的1，2，匿名函数列把一切是/ 1成1，和无/ 2到0