XX1 = circleUnif(20)
XX2 = circleUnif(20, r=0.2)
DiagLim=5
maxdimension=1
Diag1=ripsDiag(XX1,maxdimension,DiagLim, printStatus=FALSE)
Diag2=ripsDiag(XX2,maxdimension,DiagLim, printStatus=FALSE)
bottleneckDist=bottleneck(Diag1, Diag2, dimension=1)
print(bottleneckDist)
Run the code above in your browser using DataLab