Manage GInteractions anchors with plyranges
Usage
# S3 method for class 'AnchoredPinnedGInteractions'
anchor(x)
# S3 method for class 'AnchoredPinnedGInteractions'
unanchor(x)
# S3 method for class 'PinnedGInteractions'
anchor_start(x)
# S3 method for class 'PinnedGInteractions'
anchor_end(x)
# S3 method for class 'PinnedGInteractions'
anchor_center(x)
# S3 method for class 'PinnedGInteractions'
anchor_3p(x)
# S3 method for class 'PinnedGInteractions'
anchor_5p(x)
# S3 method for class 'AnchoredPinnedGInteractions'
anchor_start(x)
# S3 method for class 'AnchoredPinnedGInteractions'
anchor_end(x)
# S3 method for class 'AnchoredPinnedGInteractions'
anchor_center(x)
# S3 method for class 'AnchoredPinnedGInteractions'
anchor_3p(x)
# S3 method for class 'AnchoredPinnedGInteractions'
anchor_5p(x)
Value
anchor_*
functions return an AnchoredPinnedGInteractions object.anchor
returns a character string indicating where the pinned anchors are anchored at.unanchor
removes the anchoring for a AnchoredPinnedGInteractions object.
Examples
gi <- read.table(text = "
chr1 11 20 chr1 21 30 + +
chr1 11 20 chr1 51 55 + +
chr1 11 30 chr1 51 55 - -
chr1 11 30 chr2 51 60 - -",
col.names = c(
"seqnames1", "start1", "end1",
"seqnames2", "start2", "end2", "strand1", "strand2")
) |>
as_ginteractions() |>
mutate(score = runif(4), type = c('cis', 'cis', 'cis', 'trans'))
####################################################################
# 1. Anchoring pinned genomic interactions with plyranges
####################################################################
gi |> pin_by("second") |> anchor_end()
#> AnchoredPinnedGInteractions object with 4 interactions and 2 metadata columns:
#> Pinned on: anchors2 | Anchored by: end
#> seqnames1 ranges1 strand1 seqnames2 ranges2 strand2 | score
#> <Rle> <IRanges> <Rle> <Rle> <IRanges> <Rle> | <numeric>
#> [1] chr1 11-20 + --- chr1 21-30 + | 0.461186
#> [2] chr1 11-20 + --- chr1 51-55 + | 0.315242
#> [3] chr1 11-30 - --- chr1 51-55 - | 0.174676
#> [4] chr1 11-30 - --- chr2 51-60 - | 0.531574
#> type
#> <character>
#> [1] cis
#> [2] cis
#> [3] cis
#> [4] trans
#> -------
#> regions: 6 ranges and 0 metadata columns
#> seqinfo: 2 sequences from an unspecified genome; no seqlengths