我目前正在尝试在函数中使用mclapply来创建一个仅将所有字母都变为大写的函数。但是我的输出必须是矢量，而我得到的唯一输出是列表
library(parallel)
oneup <- function(x) toupper(x[1])
par_toupper <- function(cores) {
mclapply(cores, oneup)
}
在测试和使用我的辅助函数（根据需要）时，我总体上获得了正确的输出，但是它返回一个列表，我需要它来返回向量。我可以对功能进行任何简单的调整吗？