R：データフレーム内の名前の組み合わせの間で、対応する列をどのように参照できますか？

Question

私はデータセット内の名前のペアを取得するために、データのセットから2の異なる組み合わせを作成することができました。 mapplyを使用するときに関数を使用したいので、各ペアの各名前を対応するデータセットを参照するために使用できます。今私が持っている：つまり

myPairs <- combn(names(iris[1:4]), 2) 

f <- function(x,y) 
{ 
#Want to make a lm(x ~ y) and other potential calculations 
} 

a <- myPairs[1,] 
b <- myPairs[2,] 

mapply(f, a, b) 

を、私はそうのようにそれを計算したい：

data <- iris 
attach(data) 
lm(Sepal.Length ~ Sepal.Width) 
lm(Sepal.Length ~ Petal.Length) 
lm(Sepal.Length ~ Petal.Width) 
lm(Sepal.Width ~ Petal.Length) 
lm(Petal.Length ~ Petal.Width) 

が、データセットへの参照としてcombnから名前を使用して

Answer 1

まず第一に、あなたのデータを添付しないでください。代わりにlmにdata引数を使用してください。

のは、式を構築してみましょう：

myFormula = apply(myPairs, MARGIN = 2, FUN = paste, collapse = " ~ ") 

次にモデル

myModels = lapply(myFormula, function(x) lm(formula = x, data = iris)) 

我々はその後、いくつかの結果を調べることができます

myModels[[1]] 
# Call: 
# lm(formula = x, data = iris) 
# 
# Coefficients: 
# (Intercept) Sepal.Width 
#  6.5262  -0.2234