while循环嵌套在for循环R中

While loop nested in for loop R

我正在尝试使用 for 和 while 循环在 R 中提取单个主题数据。我希望循环相应地提取数据并将其保存为自己的数据文件。问题是 for 循环没有正确计算 Subjects 并为 b 返回正确的值。我的 while 循环运行完美,因为我可以手动设置 b 的值,运行 循环,并生成正确的数据文件。

Subjects = (1:2)
r = (1);

ST = (d$onReadyTime) #need to get ST to read not just the first number in onReadyTime for each trial 
ST=strsplit(ST,split = "a")

for (b in (1:length(Subjects)){
  b <- Subjects[r]
while (r == Subjects[b])
    {STSubject = (ST[[b]])
    ST2=(STSubject)
    #ST2=`colnames<-`(ST2,Subjects[i])
    write.table(ST2,file = paste("ST_Subject_",b,".csv",sep=""),row.names = FALSE, col.names= TRUE)
    r = r+1
    }
}

没有最低工作示例,只能提供一般指导。

n <- 0
  for (i in seq_along(models)) {
    for (j in seq_along(meters)) {
      n <- n + 1
      make_line(i, j) -> glances[[n]]
      }
  }

如前所述,这里的关键点是在内循环外初始化计数器。