我有这个函数,它接受3个参数。第一个参数是数据帧列表。第二个参数是一个数据框。第三个参数是一个简单的数值。我想更改函数的不同参数,以查看最适合我的参数并记录结果。但是对于每个参数,我都有15件事要经过,即15个列表,15个数据帧。 因此,有没有一种方法可以加快这一过程。
我尝试了do.call方法和sapply方法,但均未成功。但我认为我无法使用所需的参数正确创建列表。
matchloop <- function(data, data2, x) {
#first argument is used
split <- data
...
#second argument is used
while(nrow(tempdf0.3) >= 1 && m <= (nrow(data2))/2) {
...
#second argument used again
tempdf0.1 <- as.data.frame(data2[n:m,], stringsAsFactors = FALSE)
...
#third argument is used
tempdf0.3 <- mutate(tempdf0.3, routeID = (subset(tempdf0.5,
routeID != x)$routeID))
...
}
#return output
return(tempdf0.3)
}
如果它是一个接一个,我可以继续执行matchloop(第一个列表,第一个df,第一个值),然后继续重复第二个,第三个...。 那么有什么办法我可以一次完成所有这些操作吗?