r - 可変数の引数を持つ単純な R 関数

Question

私は一連の stata コードを R に変換してデータ クリーニングを実行するプロジェクトに取り組んでいます。私がやろうとしていることの 1 つは、以前にコード化されたすべての Yes/No 変数を消去する単一の R 関数を作成することです。 as (Yes = 1, No = 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})

data1、2 の列が含まれています。無名関数は、すべての Yes/1 を 1 に、No/2 を 0 に変換します。