#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)
)