我正在研究模型比较，其中我计算了使用ROCR软件包构建的几种不同的混淆矩阵。它们目前的格式为a_cm，b_cm，c_cm ....等等
我可以通过选择以下内容来获得混淆矩阵的准确性：
a_cm_accuracy <- a_cm$overall[1]
我想做的是类似的事情
confusion_matricies <- c(a_cm, b_cm, c_cm, d_cm, e_cm, f_cm, g_cm)
accuracy <- lapply(confusion_matricies, function(x) x['overall'][1])
但是我知道那行不通，只是返回null。我也尝试过这样做，以获取每个变量的第一个元素，但需要下一层，并且不确定如何：
test_apply2 <- lapply(confusion_matricies,"[",1)
如果我能得到一个准确度统计信息的列表，那么它将循环遍历这些统计信息的列表，那将是非常不错的。谢谢！