gap> file:=HapFile("data253a.txt");;
gap> Read(file);
gap> G:=SymmetricMatrixToFilteredGraph(D,100);
Filtered graph on 74 vertices.
gap> K:=FilteredRegularCWComplex(CliqueComplex(G,2));
Filtered regular CW-complex of dimension 2
gap> P:=PersistentBettiNumbers(K,0);;
gap> BarCodeCompactDisplay(P);
¤ Dauer der Verarbeitung: 0.11 Sekunden
(vorverarbeitet am 2026-05-20)
¤
*© Formatika GbR, Deutschland
