我的R技能仍处于起步阶段，我试图循环计算，但没有得到正确的解决方案。
我要执行30次以下操作
l1 = kak[dat1[[1]]$d1,dat1[[1]]$d2,tl] #1
l2 = kak[dat1[[2]]$d1,dat1[[2]]$d2,tl] #2
................................
l30 = kak[dat1[[30]]$d1,dat1[[30]]$d2,tl] #30
# then cbind each
cbind(l1,l2,...,l30)
在每种情况下[[i]]必须采用相同的值。而不是做30次，我决定编写一个似乎无效的函数。
这是我尝试编写的函数：
dat1 <- split(dat,dat$group) ##group runs from 1:30
#dat has three column group, d1 and d2. d1 and d2 are numeric
nw <- 0
for(i in 1:length(dat1)){
# str(kak) num [1:360, 1:180, 1:830]
# str(tl) int [1:84] 754 ...
nw =kak[dat1[[i]]$d1,dat1[[i]]$d2,tl]
}
我尝试在这里搜索类似问题没有运气。任何有解决方案或想法解决了类似问题的人都应向我指出正确的方向。