Gives the transpose of a matrix or list of matrices
transpose_byname(a)
a | the matrix to be transposed |
---|
the transposed matrix
m <- matrix(c(11,21,31,12,22,32), ncol = 2, dimnames = list(paste0("i", 1:3), paste0("c", 1:2))) %>% setrowtype("Industry") %>% setcoltype("Commodity") transpose_byname(m)#> i1 i2 i3 #> c1 11 21 31 #> c2 12 22 32 #> attr(,"rowtype") #> [1] "Commodity" #> attr(,"coltype") #> [1] "Industry"#> [[1]] #> i1 i2 i3 #> c1 11 21 31 #> c2 12 22 32 #> attr(,"rowtype") #> [1] "Commodity" #> attr(,"coltype") #> [1] "Industry" #> #> [[2]] #> i1 i2 i3 #> c1 11 21 31 #> c2 12 22 32 #> attr(,"rowtype") #> [1] "Commodity" #> attr(,"coltype") #> [1] "Industry" #>