使用cbind后更改了列名

Question

我有一个名为Sigma_ma的数据集-矩阵，其中包括30家欧洲银行的月度数据。现在我必须检查不同对之间的连通性。因此，我的计划是使用cbind创建一个新的矩阵，包括一些银行的数据。我的代码：

Sigma_ma_bank_size <- cbind(Sigma_ma[,"HSBA.L"],Sigma_ma[,"BNPP.PA"],Sigma_ma[,"DBKGn.DE"],Sigma_ma[,"SAN.MC"],Sigma_ma[,"INGA.AS"],Sigma_ma[,"ISP.MI"]
                            ,Sigma_ma[,"UBSG.S"],Sigma_ma[,"RBS.L"],Sigma_ma[,"NDASE.ST"],Sigma_ma[,"KBC.BR"],Sigma_ma[,"DNB.OL"],Sigma_ma[,"SEBa.ST"]
                            ,Sigma_ma[,"ERST.VI"],Sigma_ma[,"PEO.WA"],Sigma_ma[,"BIRG.I"],Sigma_ma[,"DANSKE.CO"])

结果是(缩写)：

         V1         V2
 7.010374e-05 1.117888e-04
 4.271750e-05 1.207572e-04

如何获得列的正确名称？V1 -> HSBA.L V2 -> BNPP.PA

非常感谢

Answer 1

您的所有专栏都来自同一个来源。不使用cbind，只需使用[子集，而不是使用所需列的向量：

Sigma_ma_bank_size <- Sigma_ma[,c("HSBA.L","BNPP.PA","DBKGn.DE","SAN.MC","INGA.AS","ISP.MI"
                            ,"UBSG.S","RBS.L","NDASE.ST","KBC.BR","DNB.OL","SEBa.ST"
                            ,"ERST.VI","PEO.WA","BIRG.I","DANSKE.CO")]

Answer 2

V1<-runif(2)
V2<-runif(2)



 Sigma_ma_bank_size<-matrix(V1,V2,nrow = 2,ncol = 2)

colnames(Sigma_ma_bank_size)<-c("V1","V2")

我假设在执行cbind之后，您的数据将如下所示

           V1        V2
[1,] 0.550721 0.1290283
[2,] 0.550721 0.1290283    

然后，您可以使用colnames根据银行的名称重命名列

colnames(Sigma_ma_bank_size)<-c('HSBA.L','BNPP.PA')

       HSBA.L   BNPP.PA
[1,] 0.550721 0.1290283
[2,] 0.550721 0.1290283