From a3cc6a87961c388f334df3c2d36835ebd03ed847 Mon Sep 17 00:00:00 2001
From: Elias Projahn <elias@johrpan.de>
Date: Sat, 11 Nov 2023 15:50:37 +0100
Subject: [PATCH] plots: Make chromosome plot static

---
 R/plots.R | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/R/plots.R b/R/plots.R
index 8d38ce6..706a4ed 100644
--- a/R/plots.R
+++ b/R/plots.R
@@ -587,7 +587,10 @@ plot_chromosomes <- function(ranking) {
 
       row_figs <- c(row_figs, list(htmltools::div(
         style = glue::glue("width: {cell_width}%; height: {row_height}%"),
-        plotly::plot_ly() |>
+        plotly::plot_ly(
+          width = 150,
+          height = 150
+        ) |>
           plotly::add_lines(
             x = positions,
             y = scores,
@@ -632,6 +635,9 @@ plot_chromosomes <- function(ranking) {
               r = 0,
               t = 0
             )
+          ) |>
+          plotly::config(
+            staticPlot = TRUE
           )
       )))