2017-01-23 5 views
0

Ich habe es endlich geschafft, alle Cliquen in einem Graphen zu generieren (ich musste R dafür installieren, alles neu für mich!).R Liste aller Cliquen eines Graphen: Wie exportiert man nach Excel?

Aber jetzt muss ich diese Liste von Cliquen exportieren und ich weiß nicht, wie man das anpackt. Mein Code ist wie folgt:

wt=read.table("data.txt") 
wt1=matrix(nrow=nrow(wt), ncol=2)  
wt1=data.frame(wt1) 
wt1[,1:2]=wt[,1:2]  
write.table(wt1,"test.txt") 
library(igraph) 
wt=read.table("test.txt") 
wg7<- graph.edgelist(cbind(as.character(wt$X1), as.character(wt$X2)), 
       directed=F) 
sum(clusters(wg7)$csize>2)   
plot(wg7) 
Allcliks <- cliques(wg7, min = NULL, max = NULL) 

Kann mir jemand helfen, den Code zu finden, die diese Liste Datei in einer Excel exportieren? Idealerweise möchte ich jede Clique in einer neuen Reihe haben.

Im Voraus Vielen Dank !!!

Antwort

1

Lösung vorgeschlagen von @ user20650 in den Kommentaren unten.

Allgemeine Daten:

library(igraph) 
g <- sample_gnp(10, 0.3) 
cl <- cliques(g) 

schreiben cl in eine CSV-Datei, die in Excel geöffnet werden kann:

for(i in seq_along(cl)){ 
    cat(paste0(cl[[i]], collapse=","), file="cliques.csv", append = TRUE, sep="\n") 
} 
+0

Dank Paulo! Dies wirft jedoch die folgende Fehlermeldung: "Fehler in WriteXLS (Allclicks, ExcelFileName =" Allclicks.xls "): Objekt 'Allclicks' nicht gefunden" Ich verstehe nicht, da Allcliks existiert und ich kann die Werte darin sehen :/ – tweedi

+0

@tweedi Aktualisiert den Beitrag. Das Problem ist, dass Ihre Objektnamen 'Allcliks' und nicht 'Allclicks' sind. –

+0

Gut entdeckt. Jetzt bekomme ich diese: "Fehler in get (x, envir = envir): Objekt '1' nicht gefunden". Ich erforsche, wie man die Liste speichert. Ich frage mich, ob es ein Formatproblem gibt? – tweedi

Verwandte Themen