bed1 <- data.frame(
chr = c(1, 2, 3),
start = c(1, 2, 3),
end = c(2, 3, 4),
annotation = c('a', 'b', 'c')
);
bed2 <- data.frame(
chr = c(1, 2, 3),
start = c(1, 20, 30),
end = c(2, 21, 31),
annotation = c('d', 'e', 'f')
);
bed.input <- list(bed1 = bed1, bed2 = bed2);
combine.pgs.bed(bed.input);
Run the code above in your browser using DataLab