Рассмотрим функцию, которая принимает два входных аргумента и возвращает кадр данных:
myFun <- function(a, b){
data.frame(aSQ = a^2, bSQ = b^2, SQPROD = a^2*b^2)
}
myFun(1, 1)
По каждому из аргументов этой функции можно построить двойной цикл:
results <- as.data.frame(matrix(0, nrow = 9, ncol = 3,
dimnames = list(c(), c('aSQ', 'bSQ', 'SQPROD'))))
for (a in 1:3)
for (b in 1:3)
results[(a-1)*3+b, ] <- myFun(a, b)
Как заменить этот двойной цикл конструкцией применения?
