Nothing
tests/test-EBexpo.R
In RPointCloud: Visualizing Topological Loops and Voids
library(RPointCloud)
data(cytof)
diag <- AML10.node287.rips[["diagram"]]
persistence <- diag[, "Death"] - diag[, "Birth"]
d1 <- persistence[diag[, "dimension"] == 1]
eb <- EBexpo(d1, 200)
hist(eb)
plot(eb, prior = 0.77)
abline(h=0, col= "gray")
cutoffSignificant(eb, 0.77, 0.8)
Try the RPointCloud package in your browser
Any scripts or data that you put into this service are public.
RPointCloud documentation built on Sept. 11, 2024, 5:27 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
library(RPointCloud)
data(cytof)
diag <- AML10.node287.rips[["diagram"]]
persistence <- diag[, "Death"] - diag[, "Birth"]
d1 <- persistence[diag[, "dimension"] == 1]
eb <- EBexpo(d1, 200)
hist(eb)
plot(eb, prior = 0.77)
abline(h=0, col= "gray")
cutoffSignificant(eb, 0.77, 0.8)
Try the RPointCloud package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.