[Bug]: Error when adding MAE subject filters

[vedhav]

What happened?

When a teal_slices object with count_type = "all" is created with a MultiAssayExperiment object the user is unable to add subjects filter and it says:

Warning: Error in : C stack usage  7954152 is too close to the limit
  93: <Anonymous>
  92: stop
  91: value[[3L]]
  90: tryCatchOne
  89: tryCatchList
  88: tryCatch
  87: do
  86: hybrid_chain
  85: renderFunc
  84: output$filter_panel-active-miniACC-subjects-cards
   3: runApp
   2: print.shiny.appobj
   1: <Anonymous>

Example app to reproduce this error:

library(teal)
library(MultiAssayExperiment)
data(miniACC)

datasets <- init_filtered_data(list(miniACC = miniACC))

set_filter_state(
  datasets = datasets,
  filter = teal_slices(count_type = "all")
)

ui <- fluidPage(
  fluidRow(
    column(
      width = 9,
      "Testing MAE filters"
    ),
    column(width = 3, datasets$ui_filter_panel("filter_panel"))
  )
)

server <- function(input, output, session) {
  datasets$srv_filter_panel("filter_panel")
}

shinyApp(ui, server)

sessionInfo()

R version 4.3.0 (2023-04-21)
Platform: aarch64-apple-darwin20 (64-bit)
Running under: macOS 14.2.1

Matrix products: default
BLAS:   /Library/Frameworks/R.framework/Versions/4.3-arm64/Resources/lib/libRblas.0.dylib 
LAPACK: /Library/Frameworks/R.framework/Versions/4.3-arm64/Resources/lib/libRlapack.dylib;  LAPACK version 3.11.0

locale:
[1] en_US.UTF-8/UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8

time zone: Asia/Kolkata
tzcode source: internal

attached base packages:
[1] stats4    stats     graphics  grDevices utils     datasets  methods  
[8] base     

other attached packages:
 [1] scda_0.1.6                  teal_0.14.0.9041           
 [3] teal.data_0.3.0.9042        teal.code_0.5.0.9001       
 [5] MultiAssayExperiment_1.28.0 SummarizedExperiment_1.32.0
 [7] Biobase_2.62.0              GenomicRanges_1.54.1       
 [9] GenomeInfoDb_1.38.5         IRanges_2.36.0             
[11] S4Vectors_0.40.2            BiocGenerics_0.48.1        
[13] MatrixGenerics_1.14.0       matrixStats_1.2.0          
[15] teal.slice_0.4.0.9035       shiny_1.8.0                

loaded via a namespace (and not attached):
 [1] gtable_0.3.4            ggplot2_3.4.4           bslib_0.6.1            
 [4] htmlwidgets_1.6.4       shinyjs_2.1.0           teal.widgets_0.4.2.9001
 [7] lattice_0.22-5          vctrs_0.6.5             tools_4.3.0            
[10] bitops_1.0-7            generics_0.1.3          tibble_3.2.1           
[13] fansi_1.0.6             pkgconfig_2.0.3         Matrix_1.6-5           
[16] data.table_1.14.10      checkmate_2.3.1         lifecycle_1.0.4        
[19] GenomeInfoDbData_1.2.11 compiler_4.3.0          munsell_0.5.0          
[22] fontawesome_0.5.2       httpuv_1.6.14           shinyWidgets_0.8.1     
[25] htmltools_0.5.7         sass_0.4.8              lazyeval_0.2.2         
[28] RCurl_1.98-1.14         yaml_2.3.8              plotly_4.10.4          
[31] tidyr_1.3.1             later_1.3.2             pillar_1.9.0           
[34] crayon_1.5.2            jquerylib_0.1.4         ellipsis_0.3.2         
[37] DelayedArray_0.28.0     cachem_1.0.8            abind_1.4-5            
[40] mime_0.12               tidyselect_1.2.0        digest_0.6.34          
[43] purrr_1.0.2             dplyr_1.1.4             fastmap_1.1.1          
[46] grid_4.3.0              colorspace_2.1-0        cli_3.6.2              
[49] SparseArray_1.2.3       logger_0.2.2            magrittr_2.0.3         
[52] S4Arrays_1.2.0          utf8_1.2.4              scales_1.3.0           
[55] promises_1.2.1          backports_1.4.1         httr_1.4.7             
[58] XVector_0.42.0          memoise_2.0.1           shinycssloaders_1.0.0  
[61] viridisLite_0.4.2       rlang_1.1.3             Rcpp_1.0.12            
[64] xtable_1.8-4            glue_1.7.0              jsonlite_1.8.8         
[67] teal.logger_0.1.3.9010  R6_2.5.1                zlibbioc_1.48.0

Relevant log output

No response

Code of Conduct

• I agree to follow this project's Code of Conduct.

Contribution Guidelines

• I agree to follow this project's Contribution Guidelines.

Security Policy

• I agree to follow this project's Security Policy.

[vedhav]

Okay, I see that the function doc already warns about this. So, I'll remove it from the current sprint and we can handle this later.

[averissimo]

Note that years_to_birth doesn't produce the error, others do.