我已经在我的多元动物园对象上运行了 ADF 测试（使用 urca 包中的 ur.df）。现在结果存储在一个大列表中，当我使用 show() 函数时，报告的结果太多：
$Company_A
###############################################################
# Augmented Dickey-Fuller Test Unit Root / Cointegration Test #
###############################################################
The value of the test statistic is: -0.5293
$Company_B
###############################################################
# Augmented Dickey-Fuller Test Unit Root / Cointegration Test #
###############################################################
The value of the test statistic is: -0.4645
数百家公司都在这样做，手动分析输出会花费太多时间，所以我想简化这个过程。
我从其他帖子中发现，我可以使用以下代码直接访问单个公司的测试统计信息：
show(data$Company_A@teststat)
现在我想将此函数与 sapply 函数结合使用，以从 ADF 测试的结果中快速检索所有测试统计信息。我试过以下代码：
sapply(data, show, teststat)
sapply(data, show, @teststat)
不幸的是，这两个都只返回错误（第一个说“找不到对象 teststat”，第二个说“意外的 @ in sapply”）。