if (FALSE) {
# create sample data
df <- data.frame(x = 1:10,y = 1:10)
# import the ripser module
ripser <- import_ripser()
# calculate persistence diagram up to dimension 1 with a maximum
# radius of 5
phom <- PyH(X = df,thresh = 5,ripser = ripser)
}
Run the code above in your browser using DataLab