minhafuncao <- function(a, b, c) {
    return(a * b + c)
}

x <- array(1:15, dim=c(5,3))
x

apply(x, 1, function(arr) do.call("minhafuncao", lapply(arr, identity)))
