r - R: 他のすべての変数に依存する各変数の回帰

Question

にはR、次のものがありますdata.frame。

df <- data.frame(var1,var2,var3)

multinom変数名を明示的に使用せずに、変数ごとにのような回帰関数を当てはめたいと思います。つまり、次の結果を得たいと考えています。

fit1 <- multinom(var1 ~ ., data=df)
fit2 <- multinom(var2 ~ ., data=df)
fit3 <- multinom(var3 ~ ., data=df)

しかし、 for ループでは、変数名を使用せずに (任意のに同じコードを使用できるようにdata.frame)。これに似たもの：

for (i in colnames(df))
{
  fit[i] <- lm(i ~ ., data=df)
}

(このコードは機能しません。)

私の質問は些細なことかもしれませんが、どうすればよいかわかりません。

ありがとう！

score 3 · Accepted Answer

文字列操作を使用して数式オブジェクトを作成するには、追加の手順を追加する必要があります

fit <- vector(mode = "list", length = ncol(df))
for (i in colnames(df)) {
    fm <- as.formula(paste0(i, " ~ ."))
    fit[[i]] <- lm(fm, data = df)
}

1 に答える 1