在做区分效度检验是，r语言提供了一种Heterotrait-Monotrait Ratio的检验方法，函数是htmt()。根据提供的案例，可以做出如下结果，请问如何理解这个矩阵呢，请高手赐教！
HS.model <- ' visual  =~ x1 + x2 + x3
              textual =~ x4 + x5 + x6
              speed   =~ x7 + x8 + x9 '

dat <- HolzingerSwineford1939[, paste0("x", 1:9)]
htmt(dat, HS.model)


> htmt(dat, HS.model)
        visual textul speed
visual  1.000              
textual 0.424  1.000      
speed   0.467  0.290  1.000