Print a PHom object.
# S3 method for class 'PHom'
print(x, ...)
# create circle dataset
angles <- runif(25, 0, 2 * pi)
circle <- cbind(cos(angles), sin(angles))
# calculate persistent homology
circle_phom <- vietoris_rips(circle)
# print persistence data
print(circle_phom)
#> PHom object containing persistence data for 25 features.
#>
#> Contains:
#> * 24 0-dim features
#> * 1 1-dim feature
#>
#> Radius/diameter: min = 0; max = 1.7433.