Aligns two sets of points via rotations and translations by Kabsch Algorithm.
alignCoor(query, subject)
A GRanges object of query
aligned to subject
.
x <- readRDS(system.file("extdata", "4DNFI1UEG1HD.chr21.FLAMINGO.res.rds",
package = "geomeTriD"
))
res <- alignCoor(x, x)
A <- view3dStructure(x, k = 3, renderer = "none")
B <- view3dStructure(res, k = 3, renderer = "none")
B <- lapply(B, function(.ele) {
.ele$side <- "right"
.ele
})
threeJsViewer(c(A, B))