Spracherkennung für: .2 vermutete Sprache: Lisp {Lisp[86] Masm[86] ABAP[36]} [Methode: maximale Elemente, drei Dimensionen]
#This example takes quite some time!
n:=50;; Betti2:=[];; Betti3:=[];;
for p in [10..133]*(1/200) do
Print("p= ",p,"\n");
Y:=RandomSimplicialTwoComplex(n,p);;
K:=CliqueComplex(Y,4);;
W:=RegularCWComplex(K);;
W:=ContractedComplex(W);;
b2:=BettiNumber(W,2);;
Add(Betti2,[p,b2]);;
b3:=BettiNumber(W,3);;
Add(Betti3,[p,b3]);;
od;
ScatterPlot(Betti2);
ScatterPlot(Betti3);
[Dauer der Verarbeitung: 0.6 Sekunden, vorverarbeitet 2026-10-25]
