Fatal编程技术网
  • r/
  • R中循环的权变系数

R中循环的权变系数

r

R中循环的权变系数,r,R,考虑以下数据集（名为data） 我的目标是计算（v1、v2、v3）和（w1、w2、w3）的所有组合的偶然系数。为了清楚起见，v1&w1，v1&w2，v1&w3，等等都使用for循环。例如，循环将在第一次迭代时执行以下操作 tab1 <- table(data$v1,data$w1) c1 < ContCoef(tab1) tab1 tab1 <- table(data$v1,data$w1) c1 < ContCoef(tab1) results = list() f

考虑以下数据集（名为
data
）

我的目标是计算
（v1、v2、v3）
和
（w1、w2、w3）
的所有组合的偶然系数。为了清楚起见，
v1&w1
，
v1&w2
，
v1&w3
，等等都使用for循环。例如，循环将在第一次迭代时执行以下操作

tab1 <- table(data$v1,data$w1)
c1 < ContCoef(tab1)

tab1

tab1 <- table(data$v1,data$w1)
c1 < ContCoef(tab1)



results = list()
for (v_col in c("v1", "v2", "v3")) {
  for(w_col in c("w1", "w2", "w3")) {
    tab = table(data[[v_col]], data[[w_col]])
    results[[paste(v_col, w_col)]] = ContCoef(tab)
  }
}

# view individual results
results[["v1_w2"]]
results[["v3_w1"]]