r - R中带有future_promise的PCA
问题描述
我正在尝试计算一个相当大的主成分分析（PCA），因为它需要一些时间，我想使用 future_promise() 来完成它。稍后我想在闪亮的应用程序中使用它。在计算承诺后，如何访问正确的列表条目以进行绘图？
例子：
pcag<-future_promise({
prcomp(mtcars)
})
我知道 prcomp 返回一个列表，其中的组件variable$x是分数（列表的第 4 项）和variable$rotation（列表的第 2 项）是我稍后要绘制的载荷。
然而pcag %...>% plot(main="Screeplot")，只绘制 screeplot （这对我来说不是那么有趣）和
pcag %...>% lapply(function(x) x[[2]][,1:2]) %...>% plot()
不幸返回
Unhandled promise error: wrong number of dimensions
如何访问列表的第 2 项和第 4 项以获取我的图？