Skip to content

GitLab

S
shaman
Commit eec80d03 authored by Amine GHOZLANE's avatar Amine GHOZLANE
Browse files
Options

Debug export format for heatmap comp

parent c2e3d1e6
Pipeline #32075 passed with stages
      in 98 minutes and 25 seconds
      Hide whitespace changes
      Inline Side-by-side
      Showing with 3 additions and 2 deletions
      server.R
      View file @ eec80d03
      ......@@ -3296,7 +3296,8 @@ shinyServer(function(input, output,session) {
      #### Export Visu
      output$exportVisuComp <- downloadHandler(
      filename <- function() { paste(input$PlotVisuSelectComp,paste('SHAMAN',input$Exp_format_Visu,sep="."),sep="_") },
      filename <- function() {
      paste(input$PlotVisuSelectComp,paste('SHAMAN',input$Exp_format_VisuComp,sep="."),sep="_") },
      content <- function(file) {
      taxo = input$TaxoSelect
      ......@@ -3314,7 +3315,7 @@ shinyServer(function(input, output,session) {
      if(filesize!=0) print(Plot_Visu_Venn(input,BaseContrast,ResDiffAnal(),ContrastListVennDebounce, export=TRUE)$res)
      }
      if(input$PlotVisuSelectComp=="Heatmap_comp"){
      if(filesize!=0) Plot_Visu_Heatmap_FC(input,BaseContrast,ResDiffAnal(),ContrastListDebounce, SelectTaxoPlotCompDebounce, export=TRUE)
      if(filesize!=0) print(Plot_Visu_Heatmap_FC(input,BaseContrast,ResDiffAnal(),ContrastListDebounce, SelectTaxoPlotCompDebounce, export=TRUE))
      }
      if(input$PlotVisuSelectComp=="pValueDensity"){
      if(filesize!=0) print(Plot_pValue_Density(input, BaseContrast, ResDiffAnal(), ContrastListDebounce, input$AlphaVal, InputpValueDensityfocus))
      ......
      Markdown is supported
      0% or
      You are about to add 0 people to the discussion. Proceed with caution.
      Finish editing this message first!
      Please register or to comment