2

我有以下代码:

test <- ca.jo(x, type='trace', ecdet='const', K=2)

当我写摘要(测试)时,会发生:

特征向量,归一化到第一列:(这些是协整关系)

              gld.l2     gdx.l2
    gld.l2  1.000000  1.0000000
    gdx.l2 -1.488325 -0.1993057

我怎样才能调用这些归一化的特征向量?

当我在写作

slot(test, "Vorg") 

我只得到以下数据

              gld.l2       gdx.l2
    gld.l2 -0.01346063 -0.012380092
    gdx.l2  0.02003378  0.002467422

但我想调用标准化的。

4

1 回答 1

3
data(denmark)
sjd <- denmark[, c("LRM", "LRY", "IBO", "IDE")]
sjd.vecm <- ca.jo(sjd, ecdet = "const", type="eigen", K=2, spec="longrun",
                  season=4)
sm <- summary(sjd.vecm)
sm@V
            LRM.l2     LRY.l2     IBO.l2     IDE.l2   constant
LRM.l2    1.000000  1.0000000  1.0000000   1.000000  1.0000000
LRY.l2   -1.032949 -1.3681031 -3.2266580  -1.883625 -0.6336946
IBO.l2    5.206919  0.2429825  0.5382847  24.399487  1.6965828
IDE.l2   -4.215879  6.8411103 -5.6473903 -14.298037 -1.8951589
constant -6.059932 -4.2708474  7.8963696  -2.263224 -8.0330127

你可能想检查str(sm)更多。

于 2012-07-13T22:15:12.473 回答