Commit de7abfd2 authored by dmattek's avatar dmattek
Browse files

Hetamp download PNG instead of PDF

parent c78bb2e3
...@@ -164,7 +164,7 @@ clustHierUI <- function(id, label = "Hierarchical CLustering") { ...@@ -164,7 +164,7 @@ clustHierUI <- function(id, label = "Hierarchical CLustering") {
), ),
br(), br(),
downPlotUI(ns('downPlotHier'), "Download PDF"), downPlotUI(ns('downPlotHier'), "Download PNG"),
actionButton(ns('butPlotHierHeatMap'), 'Plot!'), actionButton(ns('butPlotHierHeatMap'), 'Plot!'),
plotOutput(ns('outPlotHier')) plotOutput(ns('outPlotHier'))
), ),
......
...@@ -171,7 +171,7 @@ clustHierSparUI <- function(id, label = "Sparse Hierarchical CLustering") { ...@@ -171,7 +171,7 @@ clustHierSparUI <- function(id, label = "Sparse Hierarchical CLustering") {
br(), br(),
downPlotUI(ns('downPlotHierSparHM'), "Download PDF"), downPlotUI(ns('downPlotHierSparHM'), "Download PNG"),
actionButton(ns('butPlotHierSparHeatMap'), 'Plot!'), actionButton(ns('butPlotHierSparHeatMap'), 'Plot!'),
plotOutput(ns('outPlotHierSpar')) plotOutput(ns('outPlotHierSpar'))
......
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