genes <- data.frame(chr = c("6", "6", "6", "6", "6", "6", "6", "6"),
start = c(139988753, 140680185, 141708118, 142234227, 142587862,
143232344, 144398099, 144993835),
stop = c(140041457, 140826797, 141773810, 142322981, 142702315,
143260627, 144399821, 145076184),
strand = c("-", "+", "-", "-", "-", NA, "+", "-"),
Name = c("Plcz1", "Gm30215", "Gm5724", "Slco1a5", "Abcc9",
"4930407I02Rik", "Gm31777", "Bcat1"),
stringsAsFactors=FALSE)
# use scale_pos=1e-6 because data in bp but we want the plot in Mbp
plot_genes(genes, xlim=c(140, 146), scale_pos=1e-6)
Run the code above in your browser using DataLab