diff --git a/R/plots.R b/R/plots.R
index 0dd8c1a..1d1879a 100644
--- a/R/plots.R
+++ b/R/plots.R
@@ -39,18 +39,18 @@ plot_positions <- function(species_ids, gene_sets) {
plot <- plotly::plot_ly() |>
plotly::layout(
- xaxis = list(
+ xaxis = list(title = "Distance to telomeres [Bp]"),
+ yaxis = list(
title = "Species",
tickvals = species$id,
ticktext = species$name
),
- yaxis = list(title = "Distance to telomeres [Bp]"),
bargap = 0.9
) |>
plotly::add_bars(
data = species_max_distance,
- x = ~species,
- y = ~max_distance,
+ x = ~max_distance,
+ y = ~species,
name = "All genes",
marker = list(color = base_color())
)
@@ -71,8 +71,8 @@ plot_positions <- function(species_ids, gene_sets) {
plot <- plot |> plotly::add_markers(
data = gene_set_data[gene %chin% gene_set],
- x = ~species,
- y = ~distance,
+ x = ~distance,
+ y = ~species,
name = gene_set_name,
text = ~ glue::glue(
"{name}
",