Fix row/column selection

[RiboRings]

Even though the selection parameters box appears in the current panels, the selection is not received from transmitting panels like RowDataTable. It is important to figure out why this is the case.

You can test in the following example by activating row selection from the row data plot. While this works for the complex heatmap (after turning off custom row selection in the data params box), it doesn't work for the abundance density plot.

library(iSEEtree)
library(mia)

# Import TreeSE
data("GlobalPatterns", package = "mia")
tse <- GlobalPatterns

# Agglomerate TreeSE by Genus
tse_genus <- mergeFeaturesByRank(tse,
                                 rank = "Order",
                                 onRankOnly = TRUE)

# Add relabundance assay
tse_genus <- transformAssay(tse_genus, method = "relabundance")

# Add PCA
tse_genus <- scater::runPCA(tse_genus, assay.type = "counts")

# Launch iSEE
if (interactive()) {
  iSEE(tse_genus, initial = c(ColumnDataTable(), ComplexHeatmapPlot(), AbundanceDensityPlot()))
}

[RiboRings]

Fixed with this commit