diff --git a/.Rbuildignore b/.Rbuildignore index 92f7b3a..fa8bd47 100644 --- a/.Rbuildignore +++ b/.Rbuildignore @@ -1,3 +1,5 @@ ^.*\.Rproj$ ^\.Rproj\.user$ _\.new\.png$ +^\.positai$ +^\.claude$ diff --git a/.gitignore b/.gitignore index c53e2fe..bf49fc0 100644 --- a/.gitignore +++ b/.gitignore @@ -51,3 +51,4 @@ vignettes/*.pdf *_.new.png /*.csv +.positai diff --git a/R/statmodel-server-results-table.R b/R/statmodel-server-results-table.R index f3fd844..30b2926 100644 --- a/R/statmodel-server-results-table.R +++ b/R/statmodel-server-results-table.R @@ -19,7 +19,7 @@ render_results_table = function(output, session, data_comparison, SignificantPro ) }) - output$significant = renderDataTable({ SignificantProteins() }) + output$significant = renderDataTable({ SignificantProteins() }, options = list(scrollX = TRUE)) output$number = renderText({ nrow(SignificantProteins()) }) } @@ -83,9 +83,9 @@ render_ptm_results_tables = function(output, session, data_comparison, Significa } }) - output$adj_significant = renderDataTable({ SignificantProteins()$ADJUSTED.Model }) - output$unadj_significant = renderDataTable({ SignificantProteins()$PTM.Model }) - output$prot_significant = renderDataTable({ SignificantProteins()$PROTEIN.Model }) + output$adj_significant = renderDataTable({ SignificantProteins()$ADJUSTED.Model }, options = list(scrollX = TRUE)) + output$unadj_significant = renderDataTable({ SignificantProteins()$PTM.Model }, options = list(scrollX = TRUE)) + output$prot_significant = renderDataTable({ SignificantProteins()$PROTEIN.Model }, options = list(scrollX = TRUE)) output$number_adj = renderText({ nrow(SignificantProteins()$ADJUSTED.Model) }) output$number_unadj = renderText({ nrow(SignificantProteins()$PTM.Model) })