mirror of
https://github.com/johrpan/geposanui.git
synced 2025-10-26 11:17:24 +01:00
plot: Remove old plotting code
This commit is contained in:
parent
5d59018b2e
commit
495524a0ac
1 changed files with 0 additions and 25 deletions
|
|
@ -45,29 +45,4 @@ scatter_plot <- function(gene_ids, data) {
|
|||
}
|
||||
|
||||
plot
|
||||
|
||||
# plot(
|
||||
# species[, median_distance] / 1000000,
|
||||
# type = "l",
|
||||
# xaxt = "n",
|
||||
# xlab = "",
|
||||
# ylab = "Distance to telomere (Mbp)",
|
||||
# bty = "n"
|
||||
# )
|
||||
|
||||
# axis(
|
||||
# 1,
|
||||
# at = seq_len(nrow(species)),
|
||||
# tick = FALSE,
|
||||
# labels = FALSE
|
||||
# )
|
||||
|
||||
# mtext(
|
||||
# data$species[, label],
|
||||
# side = 1,
|
||||
# at = seq_len(nrow(species)),
|
||||
# las = 2,
|
||||
# # col = axis.labels.col,
|
||||
# adj = 1
|
||||
# )
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue