Adds the matrix to its transpose (X + t(X)) and loads its diagonal by the sum of each row.
symet(x, sym = TRUE, charge = TRUE, ident = FALSE)
data.frame: The matrix to process as a data.frame
logical: symmetrisation.
logical: diagonal loading.
logical: first column consists in identifiers.
a data.frame: the resulting matrix
Pierre, J. S. and C. Kasper (1990). The Design of Ethological Flow-Charts on Factorial Analysis Representations - an Application to the Study of the male Mole-Cricket Sexual Courtship. Biology of Behaviour 15(3-4): 125-151. Van der Heijden, P. G. M. 1986. Transition matrices, model fitting and correspondence analysis. In: Data Analysis and Informatics IV (Ed. by E. Diday), pp. 221-226. Elsevier Science Publishers.
# NOT RUN {
data(wiepkema)
swiepkema<-symet(wiepkema,ident=TRUE)
print(swiepkema)
# }
Run the code above in your browser using DataLab