various heat-bar/position tile faff

scripts/minimal-heat-line-example.R

@@ -0,0 +1,27 @@
+#minimal example
+
+, tpos0 = 0 # 0 is a magic number that does my sensible default
+, tW0 = 1
+, tH0 = 0.3
+
+
+plot_df = generate_distance_colour_map(plot_df, yvar_colname = stability_colname, debug=TRUE)
+
+
+cowplot::plot_grid(
+  your_working_ggpot_statement + geom_tile(aes(, tpos0 # heat-mapped distance tiles along the bot
+                                            , width  = tW0
+                                            , height = tH0)
+                                        , fill     = plotdf$ligD_colours
+                                        , colour   = plotdf$ligD_colours
+                                        , linetype = "blank") +
+    ,
+  generate_distance_legend(plot_df, yvar_colname = stability_colname)
+  ncol = 2,
+  #align = "hv",
+  rel_widths = c(9/10, 0.4/10)
+)
+
+
+
+