#Be patient! This example takes some time.
#The example uses GraphViz software.
file:=HapFile("image1.3.2.png");
F:=ReadImageAsFilteredPureCubicalComplex(file,10);
P:=PersistentBettiNumbers(F,0);;
BarCodeCompactDisplay(P);

