Wie wird eine Kopfzeile beim Symmetrieren einer Adjazenzmatrix beibehalten?

Question

Ich verwende symmetrize Funktion (sna Paket), um eine Adjazenz-Matrix zu symmetrieren, die Zeilen- und Spaltennamen hat. Zum Beispiel:
sample matrix

verwendete ich die folgende Befehlsmatrix in R zu importieren:

y <- read.table("y.csv", header=T,row.names=1,na.strings="99", sep=",") 

und dann diese Befehlsdaten zur Symmetrierung:

y_s <-symmetrize(y,rule="strong", return.as.edgelist=FALSE) 

Nachdem ich diesen Befehl, die symmetrisierte Matrix y_s hat keine Zeilen- und Spaltennamen mehr. Gibt es eine Möglichkeit, diesen Code so zu ändern, dass Zeilen- und Spaltennamen unverändert bleiben? Oder gibt es vielleicht eine andere Möglichkeit, Adjazenzmatrizen zu symmetrisieren? Danke.

Answer 1

Nicht sicher, warum die Namen verschwinden, aber Sie können die Namen basierend auf der ursprünglichen Adjazenzmatrix neu zuweisen.

rownames(x) <- rownames(y) 
colnames(x) <- colnames(y)