如何在 R 中的 lapply 中向函数添加可选参数答案

【问题标题】：How to add optional argument to function in lapply in R如何在 R 中的 lapply 中向函数添加可选参数
【发布时间】：2012-12-20 06:03:36
【问题描述】：

我正在使用以下内容：

qicout <- matrix(unlist(lapply(X = cand.set, FUN = qic)), length(cand.set), 4, byrow = TRUE)

它成功了，但我改变了函数 qic，所以它现在有一个参数

qic(model, small = TRUE)

我想调整上面的 lapply 函数以在 qic 中包含 TRUE 或 FALSE。这个计算 qicout 的 lapply 函数实际上在另一个函数中，我希望有一个 small = TRUE/FALSE 选项，以便可以将它传递给 lapply 中的 qic 函数。对最好的方法有什么建议吗？

【问题讨论】：

【解决方案1】：

我认为：

cout <- matrix(unlist(lapply(X = cand.set, FUN = qic, small = TRUE )), 
    length(cand.set), 4, byrow = TRUE)

应该可以工作或small = FALSE，但我可能理解不正确。

【讨论】：