Hi,
m1<- matrix(NA,5,5)
m1[upper.tri(m1)]<-c(2,3,8,4,9,14,5,10,15,20)
One way would be:
m1[lower.tri(m1)]<-t(m1)[lower.tri(t(m1))]
?m1
#???? [,1] [,2] [,3] [,4] [,5]
#[1,]?? NA??? 2??? 3??? 4??? 5
#[2,]??? 2?? NA??? 8??? 9?? 10
#[3,]??? 3??? 8?? NA?? 14?? 15
#[4,]??? 4??? 9?? 14?? NA?? 20
#[5,]??? 5?? 10?? 15?? 20?? NA
A.K.
Hello !
I would like to have some simple sintax in order to fill my matrix with its
transposed.
That is, as an example I have a correlation matrix like this, and the transposed
one:
> matrix
? ? ? ? ? [,1] ? ? ? ? ? ?[,2] ? ? ? ? [,3] ? ? ? ? [,4] ? ? ? ? [,5] ? ? ? ?
[1,] ? NA ? ? ? ? ? ? 2 ? ? ? ? ? ? ? 3 ? ? ? ? ? ? ?4 ? ? ? ? ? 5 ? ? ? ?
[2,] ? NA ? ? ? ? ?NA ? ? ? ? ? ? ?8 ? ? ? ? ? ? ?9 ? ? ? ? ?10 ? ? ? ?
[3,] ? NA ? ? ? ? ?NA ? ? ? ? ? NA ? ? ? ? ? ?14 ? ? ? ? 15
[4,] ? NA ? ? ? ? ?NA ? ? ? ? ? NA ? ? ? ? ? NA ? ? ? ? 20
[5,] ? NA ? ? ? ? ?NA ? ? ? ? ? NA ? ? ? ? ? NA ? ? ? ? NA
> transposed.matrix<-t(matrix)
? ? ? ? ? [,1] ? ? ? ? ? ?[,2] ? ? ? ? [,3] ? ? ? ? [,4] ? ? ? ? [,5]
[1,] ? ? ?NA ? ? ? ? NA ? ? ? ? ?NA ? ? ? ? ?NA ? ? ? ?NA
[2,] ? ? ? 2 ? ? ? ? ? ?NA ? ? ? ? NA ? ? ? ? ?NA ? ? ? ? NA
[3,] ? ? ? 3 ? ? ? ? ? ? 8 ? ? ? ? ? ?NA ? ? ? ? NA ? ? ? ? ?NA
[4,] ? ? ? 4 ? ? ? ? ? ? 9 ? ? ? ? ? ?14 ? ? ? ? ?NA ? ? ? ? ?NA
[5,] ? ? ? 5 ? ? ? ? ? 10 ? ? ? ? ? 15 ? ? ? ? ? 20 ? ? ? ? ? NA
And I would like to have....
? ? ? ? ? [,1] ? ? ? ? ? ?[,2] ? ? ? ? [,3] ? ? ? ? [,4] ? ? ? ? ?[,5]
[1,] ? ? ?NA ? ? ? ? ? 2 ? ? ? ? ? ? ? 3 ? ? ? ? ? ? ?4 ? ? ? ? ? ? 5 ?
[2,] ? ? ? 2 ? ? ? ? ? ?NA ? ? ? ? ? ? 8 ? ? ? ? ? ? ?9 ? ? ? ? ? 10 ? ?
[3,] ? ? ? 3 ? ? ? ? ? ? 8 ? ? ? ? ? ?NA ? ? ? ? ? ?14 ? ? ? ? ?15
[4,] ? ? ? 4 ? ? ? ? ? ? 9 ? ? ? ? ? ?14 ? ? ? ? ? ?NA ? ? ? ? ? 20
[5,] ? ? ? 5 ? ? ? ? ? 10 ? ? ? ? ? 15 ? ? ? ? ? ? 20 ? ? ? ? ? NA
Thank you very much for your help !!