gap> P:=PersistentBettiNumbers(F,1);;
gap> BarCodeCompactDisplay(P);
