gi2track.RdConvert GInteractions object to track object
gi2track(gi, gi2)an track object
gi <- readRDS(system.file("extdata", "nij.chr6.51120000.53200000.gi.rds", package="trackViewer"))
gi2track(gi)
#> This is an object of track
#> slot name:
#> slot type: interactionData
#> slot format: BED
#> slot dat:
#> GRanges object with 1429 ranges and 1 metadata column:
#> seqnames ranges strand | score
#> <Rle> <IRanges> <Rle> | <numeric>
#> [1] chr6 51120000-51160000 * | 45.1227
#> [2] chr6 51120000-51160000 * | 35.0006
#> [3] chr6 51120000-51160000 * | 44.7322
#> [4] chr6 51120000-51160000 * | 29.3507
#> [5] chr6 51120000-51160000 * | 38.8417
#> ... ... ... ... . ...
#> [1425] chr6 53120000-53160000 * | 48.5154
#> [1426] chr6 53120000-53160000 * | 30.4298
#> [1427] chr6 53160000-53200000 * | 21.3311
#> [1428] chr6 53160000-53200000 * | 41.7610
#> [1429] chr6 53200000-53240000 * | 19.1333
#> -------
#> seqinfo: 1 sequence from an unspecified genome; no seqlengths
#> slot dat2:
#> GRanges object with 1429 ranges and 0 metadata columns:
#> seqnames ranges strand
#> <Rle> <IRanges> <Rle>
#> [1] chr6 51120000-51160000 *
#> [2] chr6 51160000-51200000 *
#> [3] chr6 51200000-51240000 *
#> [4] chr6 51240000-51280000 *
#> [5] chr6 51280000-51320000 *
#> ... ... ... ...
#> [1425] chr6 53160000-53200000 *
#> [1426] chr6 53200000-53240000 *
#> [1427] chr6 53160000-53200000 *
#> [1428] chr6 53200000-53240000 *
#> [1429] chr6 53200000-53240000 *
#> -------
#> seqinfo: 1 sequence from an unspecified genome; no seqlengths
#> slot style: try object$style to see details.