ggplot2::ggplot(example_genes, ggplot2::aes(xmin = start, xmax = end,
y = molecule, fill = gene)) +
geom_gene_arrow() +
geom_terminator(data = example_terminators,
ggplot2::aes(x = position, y = molecule)) +
geom_terminator_label(data = example_terminators,
ggplot2::aes(x = position, y = molecule, label = name)) +
ggplot2::facet_wrap(~ molecule, scales = "free")
Run the code above in your browser using DataLab